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EDITORIAL COMMENT 


Well it looks like Uncle Sam's postal people 
did it to us again, because we got several 
calls as late as March 15th that the March 
issue had not been received yet. It was 
mailed on February 26th right on schedule, 
Even some of the first class mail was 
delivered after 14 days, But we might as 
well tell you now that this issue for reasons 
beyond our control is being mailed two days 
after our regular scheduled date. Even at 
that you should be receiving this issue 
before the 15th of the month, 


If you don't receive your issue, please give 
it an extra week from normal to allow for 
Uncle Sam's boys to get it to you. If by 
then you don't receive your issue it is time 
to call us. Some of. the snow storms that 
crossed the nation just after we mailed the 
March issue may have been some of the 
cause for delay. But this is the first time 
in three years that we have missed our 
mailing schedule by even a day, 


Well the votes are not all counted yet as to 
our survey of the most important things 
that readers want to see in CN80, but as 
the votes come in we will run the results in 
the May issue as promised. So get yours in 





the mail. Your vote is important to us, 


As the primaries votes are now being tallied 
it looks like the long, long listings are 
losing out to more informative articles, 
Many votes were received that said "don't 
change a thing" and "now that you call 
attention it, I am amazed at the scope of 
coverage you have been giving us", "Don't 
take up precious space with long listings, 
the disk series is fine." And one writer 
suggested we put out a disk with each 
issue, by increasing the subscription price 
to cover it. A very interesting idea, but one 
that would require special mail handling and 
eartons to protect both the issue and the 
disk if they were mailed together, The 
increase in cost may be beyond what one 
would expect. And yet it is an interesting 
idea that we could pursue if there was 
enough interest - let us know, 


NEWS ITEMS 
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Ted Carter of MicroLabs has made a special 
offer to CN80 readers, where you can get a 
free copy of his Draw program with the 
purchase of the MicroLabs high resolution 
board. Look for his special coupon in the 
Product Source section, 


M.A.D Software of Ft. Worth Texas is’ Still 
producing software and special items for 
the TRS-80 computers. Such as HBUILD6 
which is a utility to boot your hard drive 
directly into LS-DOS 6.3. They also have 
ROM updates for the older Model III and 
IVs. Write to them for their latest list of 
products. M. A. D. Software 

PO Box 331323 

Ft. Worth, TX 76163 


Still using SuperScripsit, (we are) and we 
just found a source for print drivers that 
we were unaware of. They have Super- 
Scripsit print drivers for all most every 
printer ever made, including a driver for 
the HP laser printer. One problem we 
found so far is that their print drivers do 
no support right hand justification when 
using proportional type spacing, but they do 
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support proportional printing with out the 
right hand justification, 


So far we have purchased two of their 
drivers, one for the FX80 and one for the 
HP laser printer. We will let you know more 
about these drivers in future issues, but for 
now the source is: 
ALPS 
1502 County Road 25 
Woodland Park, CO 80863 
(719) 687-1442 


We counted over 130 different print drivers 
that they have available. They are not 
connected with the ALPS printer line. We 
talked with a very pleasant person by the 
name of George-Jean when placing our 
order who was more than helpful in our 
selection, Each print driver is $49 with 
quantity discounts if you buy more than 
one, 
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When changing printers on SuperScripsit, 
you must adjust the document for the new 
print driver. SuperScripsit does not 
automatically adjust a document if you 
switeh from one print driver to another 
after the document has been created, 


To readjust a document to a new print 
driver do the following: 


Go to the beginning of your document, 
Type Control X to use block action 
Then type E for end of document, 
Then type B for Block action, 

Then type A for Adjust. 


This will restructure the document to the 
new print driver, 


If you change from one print driver to 
another frequently, like using as dot matrix 
for draft work and a daisy wheel printer for 
finished work, then you might want to set 
up the block adjust commands on a user 
key, to save typing the full procedure each 
time, 


FILE CABINET UPDATE 
a CN80 Staff Report 


NOTICE OF PRICE CHANGE 

We have had to increase the copy cost of 
File Cabinet disks for those of you who 
wish to supply your own disks. The new 
price is $2.75 per disk plus postage at the 
same rate as regular orders. If you send 
flippy disks the price is still $2.75 per side, 
i.e. $5.50 per disk plus postage. 


If you wish to supply your own disks with 
labels affixed, please write the name of the 
disk volume on the label before affixing the 
label, You DO NOT need to supply a return 
address label or shipping carton, You DO 
NOT have to pre-format the disks, Our copy 
procedure will format the disks to the 
format that the volumes are stored on, i.e. 
the Mod 4 disks are stored on TRS/LS-DOS 
6.3 formats, If you do supply pre-formatted 
disks, our program will just wipe it out and 
format the disk over, 


The price for our making copies of the File 
Cabinet Library of disks using our own disk 
stock is still $4.00 per disk with the same - 
more than 10 volume order - discounts as 
shown in the Readme File of your catalog. 


PROGRAM AND SUBMISSIONS 

If you would like to submit programs or 
collections of public domain programs for 
inclusion in The File Cabinet Library they 
are now to be sent directly to us at our 
regular CN80 address, If the programs you 
submit are not already in the catalog, we 
will trade you program for program, Include 
return postage for the return of your 
original program disks if we find we can not 
use them, or to cover the cost of sending 
new program disks back to you. 


Regular article submission and program 
listings to be published in CN80, of course 
is unchanged, 


SHAREWARE 

We invite all shareware program developers 
to send us their shareware and bannerware 
programs, 


While working on updating the File Cabinet 
Catalogs, we have decided to separate all 
shareware programs and bannerware 
programs from being mixed in with plain 
Public Domain programs and place them in a 
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separate SHAREWARE SECTION of the 
Catalogs, which you will be able to call up 
from the menu just as you now gall up the 
Utility, Business, Education, Games and 
Communication programs, 


We feel that this will make it easier for 
you to look over the shareware offerings of 
the programmers that are coming out with 
new programs, plus give the programmer a 
better place to promote their products. 
Remember "shareware" is the - look before 
you buy - concept, 


We do ask that if you do use the programs 
that you send the authors’ requested 
registration fee. Not only do you, in most 
eases need to do this to get the full 
documentation of the program and _ be 
registered for any updates, but it also helps 
the author defray his cost of writing 
programs that keep our beloved TRS-80's 
going with great new programs, 


Sometime in the future we may even break 
the shareware away from the present 
catalogs and issue a separate shareware 
catalog, with the programs placed in sub 
categories of their own, 


CATALOG UPDATES 

There are no new catalog listings yet. If 
you have disks that came from Tim Sewell 
directly these should be replaced with 
catalog disks that have the CN80 label on 
them, These catalogs are the latest version 
existing. 


Look for new catalog announcements or 
additions to the catalogs in this section of 
CN80, as new groups of programs are added 
we will report them here first. This will 
save you having to send your existing 
catalogs in for updating before we have a 
major group of new programs collected and 
cataloged, and at the same time let you 
know that there is a new volume of 
programs that you can order rather than 
wait for a major catalog revision. 


PROBLEM SOLVING 

We are working hard to find and correct 
individual programs in the library, and to 
find the documentation for the programs 
that are listed without any instructions, or 
write new instructions to go with them, 
otherwise the programs need to be scrapped 
from the listings. Watch this column, which 


will be a monthly feature of CN-80 from 
here on, for hints and tips to individual or 
disk volumes, 


YOUR HELP IS NEEDED 

All of this is a monumental task and we 
seek your active participation in this 
project, if you find a program that does not 
work let us know. If you find a program 
that does not have instructions with it and 
you know how it works, we invite you to 
write the instructions and send them in, 
They will be included in the library with 
your name listed as the author for writing 
the docs, keeping the proper 
acknowledgement for the programmers 
original author of course. 


SOME SOLUTIONS 


Q: On library disk MD3GAM04 there is a 
program called SOUNDA/BAS, a collection 
of sound demonstrations. When I run it the 
screen says the memory size must be set 
lower than the maximum, I don't know what 
the maximum is and set it at 5000. The 
screen then says its working, but I get a 
syntax error in line 605, changing the line 
with ' to make it a remark line did not 
work as more lines show syntax errors, 

H. A, Coldwater, MI 


A: Set memory size to 65,000 


Q: Iam having problems with some of the 
programs I have received from the File 
Cabinet, I'd like you to check them out and 
see if I am doing something wrong. I'm using 
TRSDOS 6.01.2 and get an "error 2B" when 
I try to run utility programs: SCRNSV/CMD 
(on volume MD4UTIL 01 disk); 
GETMOD/CMD (on volume MD4UTL40 disk); 
PRINT/CMD (on volume MD4UTL44 disk); 
PURGEUP/CMD (on volume MD4UTL53 disk). 
J. H. Rapid City, SD 


A: All of these programs require a TRSDOS 
6.2 or higher. We still have about 10 sets of 
original Tandy 6.2 manuals and _ systems 
disks, ($20 plus $4 S&H) or get the new 
LS-Dos 6.3.1 from Mysosis. 


Q: Some other programs I am _ having 
problems with are MEMSYS/CMD the screen 
display says "PDS Membership Required" 
(disk 01). 
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A: The documentation file explains this, 
Read (LIST) the MEMSYS/DOC file. 


Q: PURIFY/CMD displays "Illegal file 
name" (disk 40), 


A: Read (LIST) the PURIFY/SRC file. 


We are here to help if we can, and as time 
and space permits we will try to answer all 
the questions, but remember the few 
fundamental DOS commands like LIST 
DIRectory can help find and read the files 
that may support the /CMD files, The 
extensions are usually /DOC or /TXT with 
the file name the same as the name of the 


program with the /CMD extension, 


If the file has the extension of /BAS, be 
sure that you have BASIC files on your 
system disk. Not all BASIC programs are 
the same and not all programs written in 
Basic will match the BASIC you _ have, 
unless the program was written for that 
basic, If you try to load a program into 
BASIC and get "direct statement in file" try 
going back to dos ready and type the 
program name, It might just be a program 
written in machine language as a command 
file and the author did not identify it with 
the common /CMD extension. If you try 
loading a program from DOS ready, and it 
does not work, try loading it in BASIC, it 
might just be a basic program with out 
saying so with the common /BAS extension, 


Again some programs need to be loaded into 
BASIC and then when it has _ finished 
nothing happens except the word "ready" 
appears on the screen, This is ‘when you 
need to type RUN <ENTER>. Other basic 
programs might have this instruction line 
written in so that they go to a nice flashing 
menu and take you from there, not all are 
flashing and not all programmers are that 
flashy. 


If you get a "syntax error on line so and so" 
it usually means that the basic program and 
the BASIC you are using are not compatible 
and the line would either have to be 
rewritten, or you would have to find what 
BASIC the program was written’ with, 
Unfortunately the authors of the programs, 
who probably wrote the program under "his" 
basic that he was using at the time and not 
thinking that there would ever be an 


upgraded BASIC coming down the road. So 
it depends on how long the program has 
been around, as to what BASIC it was 
written under, Unfortunately we are not all 
sharp BASIC programmers to know just what 
to do to change a line to have the program 
work on "our" BASIC" instead of "his" 
BASIC. 


If you have a program that you can't make 
work under your current BASIC, try booting 
up with an older DOS version, or a newer 
version, you might just find the right 
combination without having to change the 
syntax error, 


In the mean time we will be working on 
getting the file descriptions expanded to 
tell what DOS is require, and what BASIC 
version is required. If you have a File 
Cabinet disk that you have unraveled and 
identified all the programs send _ your 
findings in (hard copy is all we would need) 
it sure would help this project. 


Another tip; if you're searching the catalog 
disk for a particular type of program use 
the WORDSCAN (on CN80 disk series #8; 
Vol 3 No. 1) to search the listings. 


And still another tip; if you want to read a 
DOC file without having to use the scroll 
stop and go of the LIST command, rename 
the file README/TXT and _ use_ the 
README/CMD that is on the catalog disk 
to read the file, It will only read files that 
are saved in ASCII, The same as the TED 
command in LS-DOS 6.3, so you might have 
to save the file in ASCII, Be sure to write 
the original name down so you can then 
rename it back to the original title, 


HIDDEN GEMS 

How often have you worked for hours on a 
document and then saved it to disk, only to 
get "end of file encountered" and you can't 
call the file back up because the file did 
not close properly. Well here is a life 
saver, I know because it just happened me 
as I was writing this segment of CN80. On 
the Model 4 Utility Disk Volume number 1 
the very first program listed is called 
CLOSE/CMD which is a short 1.5k machine 
language program for closing open files. 
Being machine language we can't print it 
here with out having the source code. And 
we don't know the origin of this program, 
but it works, it let me get back into the 
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first (and only) file of these two and a half 
pages, -CN80 


CN80 Disk series number 8 is now ready for 
shipment and has all the programs and 
program listings from the first three issues 
of 1990 on it plus the following bonus 
programs, 


There are two games both for the model 4; 
ANALYSIS/BAS which is a fun game that is 
not really what it sounds like. You start out 
by having the computer ask you what your 
problem is and then you carry on a running 
conversation with the person behind the 
computer screen, Entering some serious and 
some not so serious replies gets you some 
really off the wall responses that are 
guaranteed to have you laughing. 


CIVILWAR/BAS is the second game on the 
disk and has you refighting the civil war 
again, 


Two more bonus programs for the Model III 
folks are on this disk also, one _ is 
DSKSEC/BAS which is a Nice desk phone 
and appointment secretary. The second is 
SCREEN/BAS a utility for drawing screen 


graphics for your programs, 


Watching the Discovery Channel "Beyond 
2000" program the other night, we heard of 
a computer of the future that could 
recognize if you were smiling or just had a 
blank stare on your face, They said if you 
had a blank stare on your face the 
computer would automatically switch its 
presentation to make you happy. 


Now if we could have a computer that 
would recognize my blank stare - and then 
tell me what I don't understand, or just go 
ahead and do it right and tell me about it 
later, That would make me - very - happy! 
-Ed. 


ASSEMBLY LANGUAGE TUTOR Part 15 
by Christopher Fara (Microdex Corporation) 


Last month we have learned how to 
construct and load "memory modules", and 
how to call them from BASIC. From 
assembly programs we can use a different 
calling method based on the module name 
stored in the "header", As a reminder, the 
standard header looks like this: 


HEAD: JR EXEC sto routine 
LAST: DEFW 0 send address 
NICK: DEFB HOOK-NAME ;name length 
NAME: DEFM 'UNIQUE'  ;module name 
HOOK: DEFW 0 sreserved 
DOSS: DEFW 0 sreserved 


§ 0 OS EP ED ED CD GED SND SY a eS GD OS GR SONY SRY ONE RD PEP SY SND CD SSD GERD ED SND NPE OSE ED GED GD AND RED AD CD COED eS uD cD GND REND CSDED 
EXEC: ... actual routine starts here 











: aa 
The address labeled HEAD is the entry to 
the module after it has been relocated by 
the "loader", and JR simply jumps over the 
data in the header to the first executable 
instruction at a label EXEC in the actual 
routine, In the "word" LAST the "loader" 
has stored the address of the last byte of 
the relocated module. That address provides 
a link to any next module which might have 
been loaded right above it. The labels 
NICK, NAME mark the length and text of 
the module's name, The length is calculated 
automatically by the assembler as_ the 
difference between the addresses of HOOK 
and NAME (instead of DEFB 6 and changing 
the number every time we invent a name 
with a different length). In driver and filter 
routines the "word" at the label HOOK is 
used for the address of "device control 
block", so it's a kind of a "hook" to DOS 
device table, Finally DOSS is a "word" 
reserved for DOS. We will use those funny 
labels for reference purposes, 

MOGET subroutine 

This subroutine gets the "entry address" of 
a high-memory module, ie, the address at 
which the start of the header (label HEAD) 
has been relocated by the "loader", Before 
we call MOGET we store in a buffer the 
name of the module we want to find, 
terminated by carriage return byte 13. Let's 
say this buffer is labeled SPEC. Its address 
is passed to the subroutine in register pair 
HL (eg. LD HL,SPEC). On return Zero flag 
is set if the module has been found, and its 
entry address is in HL. If the SPECified 
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module has not been found then Z-flag is 
reset NZ. Register pairs BC and DE are 
altered, so if they contain some needed 
values, PUSH them before calling MOGET 
and POP after return. To fit the comments 
into our page format we use the symbol => 
meaning "points to" or "contains the address 


of", 


3 C2 SSD SD SED SS ED GD SS SO SO SSD SD SO CO OE OE OE aD 


s;MOGET get module address 


9 SD GS CSS COED GD CRS GAD EP a GS he Ca Gn a GD ee a ey ca GD OE ee ee Ge ee ee ete SETS ARAN ORT 


MOGET: EX DE,HL sDE=> SPEC 
LD HL,(17425) ;get high$ 
TRY: INC HL sHL=> HEAD? 
LD A,(HL) swhat's there? 
CP 24 sJR instruct'n? 
RET NZ sno, quit, else 
PUSH HL ssave HEAD 
PUSH DE ssave SPEC 
INC HL 
INC HL sHL=> LAST 
PUSH HL ssave it 
INC HL 
INC HL sHL=> NICK 
LD B,(HL) ;B=name length 
INC HL sHL=> NAME 
CAP: LD A,(DE) sspec character 
CP "A' sis it alfa? 
JR C,MATCH _ 3no, else 
AND  ODFH smake caps 
MATCH: CP (HL) smatch? 
INC HL snext in NAME 
INC DE snext in SPEC 
JR NZ,STOP sno match 
DJNZ CAP selse more? 
LD A,(DE) sSPEC end 
CP 13 scarriage ret? 
JR Z,FOUND syes, else 
STOP: POP HL sHL=> LAST 
LD E,(HL) 
INC HL 
LD D,(HL) sDE=> end mod 
EX DE,HL sHL=> end mod 
POP DE sDE=> SPEC 
POP BC strash HEAD 
JR TRY stry next if any 
FOUND: POP’ BC strash LAST 
POP BC strash SPEC 
POP HL sHL=> HEAD 
RET 


® CED CLES B59 GS SPSS SD SS SS SS SSS SF SS SS ES SE OD SS SD GS ST SG SOE EO SD SF ae 
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The listing is for Mod-III. The only change 
in Mod-4 is to replace the second line by 4 


lines required by SVC 100 to find the 
current HIGH$ address 


LD HL,O sfind 
LD B,0 shigh$ 
LD A,100 sSVC number 


RST 40 sdo it 
or "cheat" as we did from BASIC 

LD HL,(1038) ;get Mod-4 high$ 
The cheating works here, but SVC is the 
recommended method, 


First of all EX to put the address of our 
SPEC buffer to DE, because in the next 
instruction we need HL to find current 
HIGH$ address, At the label TRY increment 
that address. Here we hope to find the first 
byte of a standard module, which should be 
24, the machine code for the JR 
instruction. So we put this byte _ into 
register A and compare with 24, If it's not 
24 then search ends and we return with NZ 
flag. Either a non-standard routine sits 
there or we have reached the end of 
physical memory, How come end? Well, if 
HIGH$ address was 65535 (end of 64-K) and 
we incremented it, then the value in HL 
"wrapped around" to 0, and at address 0 in 
Mod-III and Mod-4 we will usually find the 
instruction DI (disable interrupts) but never 
JR. By the way, the "wrap around" works 
like this: 
65535 = binary 1111 1111 1111 1111 

Add 1 to the rightmost 1, the result 2 is 
binary 10, so the rightmost bit becomes 0, 
carry 1 is added to the next bit, and so on, 
until all bits are 0, and the final carry 
"falls out" from the leftmost bit and is lost. 


If JR has been found then we assume it's a 
header, PUSH HL to save this entry address 
in case it's the module we are looking for, 
and PUSH DE to save our SPEC address. We 
may need it again if the module is not the 
one we want, Then increment HL twice to 
point to the LAST address in header. Save 
it, we may also need it later to search for 
a next module if the current one is not 
what we need, Increment HL twice again to 
point to NICK where the length of module 
name is stored, Put that length into the 
"counter" register B and increment HL one 
more time to point to the first letter in 
NAME, 


At the label CAP we start a DJNZ loop to 
compare one by one the characters in our 
SPEC (pointed by DE) with characters in 
the module's NAME (pointed by HL). Notice 
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that upper and lower case letters make a 
difference, The NAME in the module should 
be all caps. The instructions between CAP 
and MATCH assure that the characters in 
SPEC will be also evaluated as caps, even 
if typed in lower case (this is the same 
CAP conversion as described in CN80 1/90 
and Z80 Tutor 1:35). After the characters 
are compared at the label MATCH, we 
increment HL and DE in case there is more 
to compare, Incrementing register pairs does 
not affect any flags, so if the comparison 
failed (flag NZ) then we jump out of the 
loop to STOP. Obviously the names don't 
match, Otherwise DJNZ until all characters 
are matched, and "fall through" to the next 
instruction, Since we have incremented DE 


after the last comparison, it now points to 


a byte in SPEC right after the last 
successfully compared character, We expect 
it to be carriage return byte 13, the 
terminator of our "search name", and put it 
into register A to compare with 13. If 
Z-flag is set then we know for sure. the 
names matched exactly, and jump _ to 
FOUND. But if that character is not a 
carriage return then it means that the name 
we specified is longer than the name in the 
module, Even though all initial characters 
of the specified name have matched all 
characters in the module, the names are not 
identical, and we fall through to STOP. 


At STOP we POP the previously saved 
address of LAST and copy the value stored 
at that address into DE (low byte to E, 
increment pointer, high byte to D). Then EX 
and now HL is the address of the end of the 
module. We will need it to continue the 
search for any next module, but first POP 
our SPEC address back into DE, and finally 
POP into BC the HEAD address which we 
won't need anymore, It's not the module we 
are looking for. We use the register pair BC 
as a sort of "trash can" simply to clear the 
stack. Now we can JR back to TRY and 
search for next module, if any. 


If FOUND then again use BC as a "trash 
can" to clear the stack and discard LAST 
and SPEC which are not needed anymore, 
Finally POP HL to restore the HEAD 
address which in this case is the correct 
one, Notice how the order of POPs must be 
the reverse of previous PUSHes. Remember 
that we jumped to FOUND on Zero flag, so 
now we RET with Z-flag set and the 
desired address in register pair HL. 


Jumping to HL 


In the past we always used JP instruction 
with a specified address, either expressed 
as a number or as a label, eg. 
JP LOOP 
But Z-80 has also a special kind of JP. 
PROPNT ALOR TL OT ERT T ARERR TACT TES eeee eee e cece cereeeeeeecreogececeeregeececorecogoercrcerocococoree 
JP (HL) 
Jump to address contained in the register 
pair HL. It is always written this way, It 
cannot be a "short" jump JR and cannot be 
"conditional" like other JP instructions, 
Teereeserececgrercceccreercerereserereceresecececeseececcetorgcercececceccsececescegcesecgcgcece 
Thus if we successfully return from MOGET 
with the address of the desired module, we 
can immediately JP (HL) to it. For example, 
let's say we want to execute such a module 
from DOS, assuming it is some module which 
makes sense when executed from DOS. The 
following stand-alone program would do it. 
It could be assembled as MODEX/CMD. 


ne re NT ge ee ee Re ee ge ee ae 
sMODEX execute module in high-memory 








ORG 32000 
MOGET: ... here type MOGET subroutine 
RUN: CALL MOGET sget address 


RET NZ snot found 
JP (HL) selse go for it 
END RUN 


9 
Here we take advantage of the fact that on 


entry to any /CMD program executed from 
DOS, the register pair HL always points to 
the first non-blank character in the "DOS 
command buffer" after the name of the 
program, For example if we enter from DOS 
MODEX UNIQUE 

then on entry to MODEX the pair HL points 
to the beginning of the word UNIQUE. The 
DOS command has been terminated by 
pressing 'enter' so at the end of UNIQUE in 
the command buffer there is a carriage 
return byte 13, This, of course, are the 
"entry conditions" needed by our MOGET 
subroutine, and we can CALL it right away 
when the program starts RUNning., 


If the module has not been found then on 
return from MOGET the Zero flag is reset 
NZ and we return to DOS as usual without 
accomplishing anything. This could be 
dressed up by adding a displayable message 
such as "module not found", We leave such 
extras for the reader to play with if 
desired, since they are not essential to our 
"lessons", Anyway, if Z-flag is set then the 
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conditional RET NZ is ignored and we jump 
to the address contained in HL. Since every 
module exits via a RET instruction, that 
RET will be used to return directly to DOS. 
The control will not return to MODEX. 


Calling HL 

But suppose we wanted to CALL the module 
and return not to DOS, but to the calling 
program, The program fragment could look 
like this: 


; RD GSE SS LED ED A NS OED CAS TALE CR ORG GE ED CL GS EE GPa SSD aD 


CALL MOGET sset address 

JR NZ,ERROR j;no good, else 

LD BC,MORE | ;ret address 

PUSH BC sonto stack 

JP (HL) sand go for it 
MORE: ... program continues here 








einen sinned tanned shasta 
Assuming the address of our SPEC buffer is 
already in HL, call MOGET as usual, On 
NZ-return (module not found) jump to some 
error processing routine at the _ label 
ERROR elsewhere in the program, On 
Z-return we have the address in HL but 
CALL (HL) is not a valid Z-80 instruction. 
Some processors, such as Intel 8088 in 
IBM-PC do allow such calls, But recall how 
the stack works (CN80 10/89:6, Z80 Tutor 
1:26), We want to return from the module to 
the label MORE to continue the main 
program, The CALL would automatically put 
the return address of MORE onto the stack, 
Here we do it "manually", Put the address 
of MORE into register pair BC and PUSH it 
onto the stack. Then JP (HL). When the 
subroutine in the module is done, it 
RETurns to the address of MORE. which we 
have sneaked onto the stack, 


Another popular trick is to let the program 
modify itself, For example: 


® GD SE SD SSE Sea ae Ga SPA SCOR SEES GY SY CEP CES LED GSAS AES 
3 


CALL MOGET sget address 
JR NZ,ERROR _ sno good, else 
LD (MORE-2),HL ;stuff addr 
CALL 0000 sinto call 
MORE: ... program continues here 
— 
Recall the picture of a program as it sits in 
memory (CN80 5/89:8, Z80 Tutor 1:10), The 
CALL instruction is encoded in 3 bytes: 
first the call itself, then 2 bytes for the 
address. MORE is the memory location just 
after the CALL. Therefore MORE-2 is the 
location of the call's address, In the source 
listing we write a "dummy" call to 0000. 














5 PLD OLE LD LEY OLY TS CLEP TEDL) LEG LLL CLD CLG TED ED 


During program execution the instruction 

LD (MORE-2),HL 
"stuffs" the value of HL in place of the 
dummy, While we normally don't promote 
such "creative" tricks, sometimes they are 
necessary to compensate for the processor's 
limitations, 


Note: Z80 Tutor [1:26 ete, refers to the 
pages in the revised collection of our CN80 
1989 tutorial series, now available in book 
form from CN80 ($9.95). Copyright 1990 by 
Christopher Fara Assembly Language Tutor 
is copyrighted by the author with all rights 
reserved, It is reprinted here by permission 
of the author. 


MORE ABOUT COMPUTERS 
by David Dalager 


Sorry I've not written for the last two 
issues, A heart attack on the first Saturday 
of January prevented me from getting that 
one in. Catching up on getting stuff shipped 
that people had paid me for, stopped the 
February article, 


No, my body did not betray me, | had 
betrayed it. Sitting at my workbench and 
computer, not giving the body the exercise 
it needed caused the heart attack. The 
moral in this is: "If you are going to do 
sedentary (sitting around) work or play and 
don't exercise the body, you are setting the 
stage to have an heart attack." For crying 
out loud, be sure to exercise your body as 
well as your mind, I'm doing excellently, far 
beyond most doctor's expectations, Thank 
you, Now, let's have some fun, 


Thanks to Tandy no. longer providing 
software support, there are many new 
programs coming out. Several new graphics 
programs have come upon the scene, Two of 
which could be said to be several in one 
package, one is by Robert Doerr, another is 
by Bill McInnis, another by Bill Bowman, 
There are many more than I'm aware of, 
and remember, I try to keep up with all as 
my time allows, 


Robert Doerr has an interesting story about 
writing his group of programs, Seems he 
sent his $15 to Paul F. Barnett for the 
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shareware fee for P2DOTx ( a model III 
program) that converted  Printshop to 
Dotwriter format, allowing the Printshop 
icons to be printed. Robert got his letter 
back with "addressee unknown" on_ the 
envelope, Robert phoned Paul for a better 
address, Robert points out that if Paul had 
not released P2DOTx that the model 4 
version would not have come into existence, 
Remember that the programs that Robert 
and Paul wrote are shareware, that means 
that if you use any shareware programs, 
please remit the requested fees. For darn 
sure if you want to see more programs 
written. This fee is both their 
acknowledgement and encouragement. There 
are 13 programs in all. 


Permit me to take the liberty to point out 
that any program you are not familiar with 
is new. I have not gone through all of The 
File Cabinet yet, so | still sit with about 
yumpteen’ disks, all loaded with new 
programs. New simply because they have not 
yet been tried, 


UTILITIES and APPLICATIONS 

The File Cabinet is chock full of tools 
(utilities) that can do many things for you. 
Probably the very thing you've been looking 
for. I had two pointed out to me the other 
day. A friend who reached into my disks, 
pulled one out that had the very application 
I needed, I didn't know it was there, Well, 
that's not exactly true, I hadn't looked in a 
while, 


COMMUNICATIONS 

There are a number of communications 
programs that will help you use a modem 
for communicating with other as well as 
Bulletin Board Systems in the section of 
The File Cabinet. A very interesting one is 
MULTICOM/CMD that permits idiots like me 
to use the modem to transfer files to 
another computer with Multicom’§ very 
easily. I kidded it's author, James Reed, of 
Arlington, TX, who also wrote 
STARTEXT/CMD about tailor-writing 
Multicom especially for me, James. has 
recently updated Multicom so it would also 
be capable of operating at 2400 BPS as well 
as 300, and 1200. There is also XT4/CMD, 
X1T3/CMD for the model 3, FasTerm by Mel 
Patrick in B.C. Canada. The latest version 
will even keep track of your "modem-ing" 
costs, 

-David Dalager 


MY ADVENTURES WITH HARD DRIVES 
Part 5 
by Roy T. Beck 


I have a VR DATA HARD DISK III whieh I 
acquired for a few dollars one time. The 
few dollars was because there was no 
"bubble" in it. The previous owner had 
removed the original 10 Meg bubble and 
replaced it with a larger one. Later he 
moved the larger one to an IBM, leaving the 
HARD DISK III sans bubble. However, it 
does have the power supply, host adapter 
and controller board in it, 


The unit is about 14" x 15" x 5", resembles 
the Mod 4P in style and paint job, weighs 
about the same as a 4P, and contains a 
linear power supply and aé hard _ disk 
controller (HDC). The power supply is set up 
for two bubbles, although the front panel 
has only one opening. Since the HDC also 
has provisions for a second bubble, it is 
clear that VR DATA really intended the 
unit to operate two bubbles; but the selling 
price when it was new in the summer of 
1983 was over $1300, and probably few 
customers could afford (or needed) the 
second bubble, The nameplate showed this 
particular unit originally had one Tandon 
TM-502S bubble with a capacity of 10 Meg. 
The "III" in the nameplate evidently 
indicated it was intended to work with the 
Model III, but since the Models 4 and 4P 
have the same I/O port, there is no reason 
it should not work with a 4P. 


Study of the hardware reveals the HDC is a 
Xebee board. After exploring the remains 
for a while, I put it aside on a shelf and 
went onto other projects, After getting a 
RS work-alike 35 Meg drive running very 
happily at home, I began to consider setting 
up something for use in my office at work, I 
already had a 4P running there, but having 
tasted the joys of HD operation at home, I 
became anxious to add an HD to _ the 
machine at work, 


After letting the HARD DISK III "mature" 
on the shelf for a long time, I decided to 
make it work, The first question was what 
bubble to put in it? I have two identical, 
working, Tandon TM602S bubbles on hand, 
for which I paid $15 each, used, They 
worked on my IBM clone until I outgrew 
them, The front cover plate of the Hard 
Disk III has only one hole in it. Rather than 
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indulge in my not-so-elegant tinsmithing, | 
simply took the front panel off, I then 
proceeded to install the two bubbles, Made 
a hefty package when completed, but it is 
compact and pretty good looking, (even 
without the front panel), I added a suitcase 
handle on one side and some rubber feet on 
the other side and the bottom. Presto, a 
"portable" hard drive! 


The next question was software, specifically 
HD drivers for the DOSes I wanted to use, 
To digress a bit, in reading back issues of 
The MISOSYS Quarterly I had seen a 
reference to a VRHARD driver in a letter 
from a reader to Roy Soltoff. The letter did 
not clearly identify the driver, but the 
context indicated it might be a TRSDOS 
driver for the HARD DISK III unit. I called 
Roy, and he confirmed he still offers the 
driver (even though it is not in his current 
catalog) and yes, it should be right for my 
unit, (Thanks, Roy!) I bought it and installed 
TRSDOS 6.3 on one drive of the two in the 
box, The driver also allows for two bubbles 
in the box, I assigned all of one 5 Meg 
bubble as drives 0, 1, 2, and 3 for TRSDOS 
6.3 running on a 4P, This package I took to 
my daytime office, where I use it for word 
processing, mostly. I have AllWrite and 
Electric Webster running on _ it, plus 
SuperCross so I can turn over an IBM disk 
to the word processors elsewhere in the 
office who mostly use (ugh) IBM clones, At 
this point, I was happily using one of the 
two bubbles, but the other was simply 
keeping itself warm as it revolved, . doing 
nothing useful, 


Recently my boss indicated all of us 
engineer types ought to learn dBASE and 
LOTUS. I didn't want to have one of the 
firm's IBM's issued to me, and it is always a 
hassle to find an unoccupied one when | 
need it. Further, I have a copy of dBASE II 
which I have dabbled with for 3 years while 
I kept the books for a computer club, 
Ironically, the club is IBM oriented, and I 
was amused to occasionally remind the 
members that their roster was being kept on 
dBASE Il, running under CP/M on a TRS 
Model 4! The combination has worked well, 
but I really never got past the command 
mode of dBASE II. 


My question now was how to put CP/M on 
my HARD DISK III at work, I can't use the 
39 Meg drivers, since that 35 Meg drive has 


the RS 26-1138 Western Digital controller 
in it, and the HARD DISK III has the Xebec 
S1410A SASI controller, Obviously I needed 
a driver for CP/M on the Xebec S1410A. 


The only legitimate option seemed to be our 
old friend Monte of Montezuma Micro, for 
whom Software Wizard Jesse Bob Overholt 
has written much good stuff. Suiting the 
action to the thought, I called Montezuma 
Micro, and inquired if by any chance they 
had a HD driver for their CP/M on a HARD 
DISK III with 5 Meg bubbles in it. The 
initial response was essentially "Say What?", 
After repeating my request, and being 
transferred a couple of times, I reached 
Kevin, the. manager, who knew what I 
wanted, but could only say no, they did not 
have it. 


I next inquired what it would cost to have 
the necessary driver written for me? The 
cost would be $475, the time frame about 
90 days, and I would have to ship my HD to 
them for testing. I said this was uneconomic 
and I could not pursue that course of 
action, 


However, I have a partial listing of the HD 
drivers they have done, and on it there is 
listed a driver for an Aerocomp 5 Meg HD 
(Aerocomp is another branch of John 
Lancione's empire, Montezuma Micro being 
the CP/M arm of it), Since I knew the 
Aerocomp unit also used a SASI controller, I 
decided to buy the Aerocomp driver and try 
to patch it to work with the SASI controller 
in my HARD DISK III box, Kevin warned me 
several times that they could not guarantee 
the Aerocomp driver would work on my 
HARD DISK III unit, and it was entirely my 
responsibility and no guarantees applied. 
(When the driver arrived, the same notice 
was even on my invoice!) I assured Kevin I 
would not try to hold them responsible, and 
I understood I was strictly on my own, I 
think he was a little too cautious about my 
application of the Aerocomp driver, but 
they have probably had some _ unjustified 
complaints in the past. 


By the way, if you are inclined to go for a 
new hard drive (or other TRS add-ons), 
Aerocomp' should be- considered, John 
Lancione is offering new components, good 
drivers, and has submitted his equipment for 
the required FCC testing. Not all vendors 
do that. John has stayed with us TRS users, 
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and deserves consideration when you are 
planning to spend money. 


Anyway, the driver disk arrived, and on it 
was the promised Aerocomp driver. But, 
Surprise!, there were two VR DATA drivers 
on the disk, also! However, they were for a 
VR DATA 17 Meg drive, and I have only 5 
Meg bubbles in the box, The copyright date 
is 1983, so I guess everyone at Monte's 
abode had simply forgotten these drivers 
ever existed. What to do? Since both VR 
DATA drivers were for a 17 Meg bubble 
with 4 heads and 480 tracks, I began 
cogitating. 


The head count is correct for the bubbles | 


have, but the track count is wrong, as my 


bubbles have 153 tracks. One of the two VR 
drivers was written to partition by head 
offset, and the other by track offset. The 
latter looked promising. 


If I use this 17 Meg driver on one of my 
bubbles and tell the driver that the first 
120 tracks (25% of 480) of each head are to 
be used for drive A, and simply don't assign 
the other 360 tracks, then I will have lost 
the use of 153 - 120 = 33 tracks or about 1 
Meg, but the other 4 Megs should operate 
as drive A. For my immediate purposes, this 
would be fine and dandy, After all, dBASE 
II runs OK on a couple of floppies, so a 4 
Meg hard disk would be like a skating rink 
for it to rattle around in, 


My next step was to try out the 17 Meg 
driver and if it works, go ahead and use it, 
The only potential problems I could see 
were the matters of write precompensation 
and write current reduction, Since the 
driver might have been written to shift at 
track 240, then it would not shift at track 
128 where the Tandon bubble expects it. 
Either of these two discrepancies might be 
enough to prevent successful operation, and 
if that happens, I must go on to the next 
option, 


I attempted to install and run both of the 
two 17 Meg drivers, The head offset driver 
wouldn't do anything worthwhile, But the 
other, track offset, version gave me slightly 
better results. I ended up with CP/M 
OPERATING from the Hard Disk III, but I 
could not read files sent to it via PIP. Well, 
nice try. 


Now on to the second option, which would 
consist of disassembly of the driver, 
discovery of how and where the precomp 
and write current reduction events occur, 
and then patch the correct values into the 
code, 


But how to disassemble the driver? I don't 
have all the nice tools of TRS to massage a 
CP/M program, If the mountain won't come 
to Mohammed, maybe Mohammed can travel 
to the mountain, I wanted to use Soltoff's 
DSMBLR because it allows masking of data 
and text areas, (there are a lot of these in 
the driver), and I wanted to use NewDos80's 
DISASSEMbler because of its feature which 
gives you all the back references within the 
code. How to move the CP/M program to 
TRS? I used DDT to load the driver at 
0100H, the usual load address, and then 
block moved the driver to 8100H in memory, 
The driver was less than 1300H in length, 
After making the block move, I rebooted 
the machine under TRSDOS 6.3 and then 
DUMPed the still resident block of memory 
at 8100H to my 35 Meg hard disk under an 
appropriate TRS file name, Next I used one 
of Soltoff's Golden Oldies to check the file 
on the hard disk to verify I had indeed 
gotten the file J] wanted, All OK in this 
regard, I moved all three of the MM drivers 
to my TRS hard disk this way, Next, I ran 
the two disassemblers to create files for 
study. 


After sufficient study, I was able to 
determine where the total track count, the 
precomp and the reduce write current track 
numbers are stored in the driver. All told 
the disassembly of the 17 Meg VR Data 
driver took a good 2 months of spare time 
study. But I did it! 


Once I had the necessary patching locations 
and contents identified, I took DU and a 
fresh copy of the 17 Meg driver in hand and 
went to work. My first effort was almost 
successful. Off by one bit, it turned out! 
What happened was that the second bubble 
would accept CP/M on its system tracks, 
but when I tried to move the other files 
over to it, it gave me an error message to 
the effect that my directory was full! 


One night's thought pointed me in the right 
direction, Given its druthers (defaults), the 
Xebece controller will format all sectors 
with the hex character 6C. CP/M, however, 
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insists that the first byte of every directory 
entry be hex E95, as this is how CP/M 
determines if a directory slot is in use or is 
vacant, To accomplish this, the driver sets 
up a buffer in the HDC full of E5S's. My 
problem was that I was also following 
Soltoff's code- for general guidance, and 
since he was writing for TRSDOS and LDOS, 
which don't care what the formatting byte 
is, he did not set the bit which requires the 
HDC to USE the contents of the HDC 
buffer, Another aspect of my problem is 
that the Xebec data available to me is 
inconsistent, and at first I had no clue to 
the purpose or significance of the bit which 
turned out to control the formatting. Once | 
understood the problem, I set the one flag 
bit involved, and tried again, Success! I now 
had the driver patched to match the 5 Meg, 
4 headed drive, and I assigned head #4 to 
CP/M as drive A:. 


I used the other 3 heads of the drive for 
LDOS, and, just for convenience, I told 
LDOS it could share head #3 of the other 
bubble with TRSDOS. This allowed me to 
move files between DOSes, as both TRSNOS 
and LDOS ean read the same files, 


At this point, and for a week, I was feeling 
great with my pride of accomplishment 
spilling all over anyone who would sit still 
for a minute or two, I then decided to take 
the drive to a club meeting to demo what I 
had accomplished. Bad decision! I gently 
carried the drive to my car, took it home, 
took it to the meeting, and now it wouldn't 
boot CP/M or LDOS. I could still boot 
TRSDOS on the first bubble, but nothing on: 
the second. Wha' Hoppen? 


After further analysis, I came to the 
conclusion the Xebec HDC would no longer 
access the second bubble, I still don't know 
why. In any event, I had to do something. 
Since I still had another bubble laying 
around, a 12 Meg unit of questionable 
virtue and unknown history, I decided to 
plug that one into the HARD DISK III box 
and try to use one large bubble in place of 
the two smaller ones, But, talk about the 
fickle finger of fate! This bubble turned out 
to have two bad heads in it, so instead of 
being a 12 Meg, 6 head bubble, it was 
effectively only an 8 Meg, 4 head unit. But 
the 4 heads worked and reported no bad 
sectors, so now [I have a HARD DISK III 
with one 8 Meg bubble in it. (I didn't even 


consider repairing the 2 bad heads in the 
bubble, as I think I only paid $20 for it, and 
a technician with a clean room won't touch 
a bubble for less than $75), 


By patching the VR DATA driver again, I 
now have CP/M on head #4, with TRSDOS 
and LDOS sharing the other 3 heads, Again, 
I set up drive :2 as common for TRSDOS 
and LDOS. I now have all 3 DOSes on the 
one "8 Meg" bubble, I use them regularly, I 
did do a demo at a later meeting, and the 
only question still open is why the Xebec 
HDC won't access a second bubble, Since | 
want to do other things, I am not going to 
chase that bug. I even put the front panel 
back on and the HARD DISK III box looks 
very nice, 


Implementation of this old HARD DISK III 
has been a long, interesting road, but I feel 
I have accomplished something in the way 
of personal satisfaction, and have shown 
there is life yet in some of our antiques! 
-Roy T. Beck 


TIME TO RENEW? 
If your mailing label ends with 90/04 
IT'S TIME TO SEND YOUR RENEWAL IN. 


A VISIT WITH DAVID GOBEN 
by David Goben 


TRIALS AND TRIBULATIONS 

The subject for this month was a toss-up. 
Originally I had planned on showing you how 
to turn your Model I/III/4/4D into a digital 
recorder, then I decided that I would first 
show you (us!) ORCHESTRA-90 fans how to 
automate music file playing via an 
intelligent menuing interface, and finally 
(after some initial trouble getting problem 
reports with VIDX ironed out) I decided that 
I should share a common plight of 
programmers when trying to write programs 
for various TRS-80 computer configurations. 
Therefore the digital recorder and 
Orchestra-90 interfaces will be presented in 
the near future. 


If you are a regular with CN-80 and my 
column, you'll recall that in the January 
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1990 issue of CN-80 (Volume 3 # 1, page 
14), under the heading of "Scroll Protect 
for I/III" I presented 2 programs; VIDX/CMD 
and PROTECT/CMD. I had of course 
written these programs in machine language, 
but for presentation in the pages of CN-80 
(and to save lots of space), I converted the 
files into a BASIC "data-poke" format that 
most anyone can key in. Unfortunately the 
DATAPOKE/BAS program I used creates 
files targeted for the Model 4 mode, so 
after the conversion I was forced to modify 
the resulting program to run on the Model | 
and III, In the process [ accidentally 
removed an important statement in line 70 
of both program listings (One and Two), as | 
had reported in the March 1990 issue, 
Basically what the fix detailed was that you 
should change the :GOTO 50 statement at 
the end of the line to 
sPRINT#1,CHRS$(A);:sGOTO 50. This fixed 
the problem and allowed the programs to 
create workable CMD files, 


Other problem reports stated that after the 
inclusion of the above-named fix, the 
programs still did not work. So I went to 
the trouble to key the programs in as listed 
in CN-80 and run them (of course adding 
the extra statement in line 70 of each), 
They worked like a champ. So if you are 
having trouble in that department then you 
may have keyed something in wrong, but did 
it in such a way that the checksums still 
came out right. For those of you with that 
problem I strongly suggest that you get the 
CN-80 Disk Series Disk Number Eight (8), 
which is presently available for $5 from 
CN-80 (see the PRODUCT ORDER page 
later in this issue), Besides, this saves you a 
LOT of time and trouble, AND the programs 
VIDX/CMD and PROTECT/CMD are already 
on disk, pre-assembled for you. 


Anyway, another problem report had me 
totally baffled. The writer reported that 
PROTECT/CMD worked ffine, but that 
poking both 16916 and 16428 did nothing. 
ARGH! I work so hard to make life easier 
for you. I gnash my teeth (violins play in 
the background) when [| do something that 
makes it less easy, 


His report of nothing happening when he 
poked a value to 16916 on the Model III had 
me baffled because on my re-keyed copy 
(and the original -—- the copy that you will 
find on the Disk Series disk) it worked fine. 


But when [I applied the optional patch 
mentioned on page 15 of CN-80 Vol 3 # 1 
for the Model III to make the I and III 
version use the same poke address, this 
caused it to fail, Double-ARGH! Model I 
users were not able to scroll-protect except 
by using PROTECT/CMD. 


After digging through the source code for 
the programs I found that there was 
NOTHING wrong with the programs 
themselves (whew!). However I did find that 
in my original program design I had selected 
address 16428 (hex address 402C) as the 
scroll protect address, but [ had later 
discovered that this caused a problem on 
the Model III, and so I had no choice but to 
change the address to a commonly safe 
address I had found at 16543 (hex 409F) so 
that the Model III would not choke when 
PROTECT/CMD was used, Unfortunately for 
you (and me) when I wrote my column to 
accompany the program, I referred to my 
older notes that had still specified 16428 as 
the proper poke address, although the 
current programs no longer supported this 
Older address, Rats! 


So, as also reported in the March 1990 
issue, the PROPER Model I poke address is 
16543. Actually, this is a kind of easy 
address to remember, So you Model I users 
who were frustrated, use 16543 (hex 409F) 
instead and all will be roses, Also, those 
Model III users out there who were having 
trouble, use 16916. If it does not work then 
you did something wrong, as the program 
-does- use this 16916 address (hex 4214), 
This is of course the "standard" Model III 
scroll-protect poke address. If you had 
applied the patch to make the III use the 
same address as the Model I then you should 
use the Model I 16543 address _ instead. 
Whew. Beat me fifty lashes with a wet 
noodle, 


But this brings me to yet -another- subject: 


MACHINE SENSING: WHERE ARE WE? 

How many times have you written a real 
gem of a program, debugging it until it runs 
flawlessly on your computer, Then, in a 
moment of pride and glory, you give a copy 
to friend who has a different model TRS-80. 
But instead of hearing ooh's and aah's and 
gasps of amazement (and them kissing your 
shoelaces for a particularly astounding 
project), they instead turn around and say 
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"Hey. I thought you said you debugged this 
stupid thing. Look, it doesn't work!" 


Well, instead of killing all witnesses, you 
may find the following information quite 
useful, You should know something about 
such terms as word-sized values, bytes, hex 
addresses and such to follow this. If you 
don't understand this then you should not 
bother reading further, or you should read a 
good introduction to assembly language 
which covers’ such subjects, such = as 
"Assembly Language for the Models III and 
4" by Chris Fara, or "Z-80 Machine 
Language Techniques" by Don Ady. Both 
books are available from CN-80, 


It used to be that to check which computer 


you were on you simply looked at address 
X'0125', If the byte there had a value of 
X'49' (the ASCII code for the letter 'I') 
then you were using a Model III, otherwise 
you were using a Model I. Things got more 
complicated when the LOBO- "clone" 
computers came along, as well as the Model 
4. Many of us take for granted that we can 
try poking a value into low memory, and if 
it takes this means we have a Model 4, 
otherwise it is a I or a III, and so the test 
first mentioned would be used to get the 
final verdict of the computer type. This is 
no longer true as many programs such as 
the hardware interface kit for LDOS 5.3 
and other MEMDISK programs for the III 
mode of a Model 4 place the ROM image in 
RAM, and so eliminates the reliability of 
this poking test. Due to this | tried to 
develop a list of PEEKs that could reveal 
the proper computer type. 


If the byte at address X'0000' is X'C3' then 
it is a Model 4 running under Model 4 
Multidos, 


If the byte at address X'0200' is X'C3' then 
it is a Model 4 running under DOSPLUS IV. 


If the byte at address X'020F" is X'49" then 
it is a Model 4 running under 
TRSDOS/LS-DOS 6. 


If the hex address at address X'0006' is 
X'4000' then the computer is a Model 1/III. 


If you know the computer is a I/II (as 
tested from above), then if peeking at hex 
address X'0125' results in a byte value of 
X'49' (the ASCII letter 'I') then it is a 
Model III -- otherwise it is a Model I, 


If the Computer is a Model I, then you can 
tell if you are using a LOBO LX-80 Model I 
work-alike by looking at the byte at address 
X'3000', If the value is X'F3' then it is an 
LX-80; otherwise it is a "real" Model I, 


If you know that the computer passes the 
Model III tests then if the word at address 
X'36FF' is X'1B60' then it is a Model 
4/4P/4D running the the III-mode, 


If you know you that the computer is a III 
and is not a 4/4P/4D, then if the bytes at 
hex addresses X'37F8' and X'37F9" are the 
same then you are running on a LOBO 
MAX-80 Model III work-alike, otherwise you 
are operating on a real Model III. 


But what is so important about knowing 
such things? Well, for one thing a program 
will often require different system calls 
depending on what type of machine is being 
used, such as a standard I and III and 4, 
Some other machines, such as the LX-80 
and MAX-80 may require special 
initializations that its different architecture 
might dictate, such as its expanded RS232 
interfaces. Other more complicated things 
result from the use of the printer port, like 
if we should send a byte directly to the 
printer via hex address X'37E8' or port 
X'F8', It is due to these simple little things 
that allows a program to run on one 
machine and not to run on another, There 
are many differences between the clones 
and the Tandy computers as well. More than 
once I have heard from MAX-80 owners "I 
thought you said that this program ran on 
the Model III? I can't get it to run on my 
MAX?" JI can only answer with: "That's 
right; I said it would run on a Model III, I 
did not say it would run on a MAX." 


Problems usually sprout from a program's 
use of ROM calls, On the surface these 
calls are gems because they save us so 
much labor, but when you try running on 
EVERY machine possible you run into a lot 
of trouble, often resulting in a program 
growing quite large just to cover 
initialization; machine testing and adjusting 
for them, This problem has troubled me to 
this day. I therefore try to make my 
programs run on only "real" Model I and III 
and 4's, and try to make them operate on as 
many operating systems that support only 
these 3 computer configurations, 
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Of course this test list may still be 
incomplete. Since I do not have access to a 
LX-80 or a MAX-80 I can only go on 
information provided for me, which 
currently is next to nothing. But what about 
the Video Genie Model I work-alike? Any of 
you have it? How can a program test for it? 
Using 20-20 hindsight I wish I had the 
knowledge that Peter Ray down at Anitek 
has concerning machine sensing. Considering 
the impressive array of TRS-80 
environments that LeScript supports, his 
knowledge is obviously vast and respectable, 


DATE EXTENDING LS-DOS 6.3 (#2) 

I understand that LS-DOS 6.3.1 contains 
code to extend the dating of LS-DOS to 
December 31, 2011. If you are a regular 
reader of CN-80 then you'll recall that | 
had already provided you with the patches 
needed to do this in Volume 2 Number 6, 
page 16, I don't know what patches Roy 
down at MISOSYS applied to add _ this 
feature, but I suspect that they will 
emulate in most respects my own patches, 
as I had submitted them to him in October 
of 1988, 


At the time I submitted them he told me 
there wasn't much chance of adding such 
patches as he did not see the future of the 
TRS-80 going through to the year 2000, 
Apparently something has changed his mind 
-- YOU! If it had not been for you, the 
users and supporters of TRS-80 equipment, 
things such as this would never have come 
about, Thank you for supporting those who 
support you! May this trend ever continue, 


But while we are on the subject of date 
extending, I thought that I would share with 
you some more news, I have managed to 
modify my own 6.3 extension patches so 
that those of you who have’ added 
extensions to your DOS, such as patches to 
support the XLR8er board, the Alpha 
Technologies Board and such will not have a 
head-scratching session when using my 
patches, I have now found a way to modify 
LS-DOS 6.3.0 in such a manner that the 
date extension patches will not interfere 
with the memory enhancement boards, and 
in fact will no longer require § any 
low-memory driver space, I sat down the 
other day rethinking my approach and found 
an easier way to install the patches and to 
have enough room in patch areas to apply 
my modifications. I am sure that the new 


LS-DOS 6.3.1 changes will do pretty much 
the same, 


Also included within these patches is the 
ability to simplify date entry upon boot-up 
and when using the DATE library command. 
After installing the patches you will be able 
to enter a date such as April 5, 1990 as 
4.5.90. Thus if you had once installed my 
patches mentioned in this column sometime 
ago to do this one feature, you will not 
need to re-install them, Further, those of 
you who had to de-install them due _ to 
conflicts with the code with your XLR8er 
board system support software can now 
breath easier because this new code will 
not interfere with it. 


These new listings can be found in the 
program listing section of this month's 
magazine as Patch Listing Number One 
through Patch Listing Number Six. Once you 
have created all 6 listings using either 
BUILD or a word processor that is capable 
of saving a file in ASCII format (avoid using 
TED because its_ end-of-file character 
confuses PATCH when used with FIX files), 
you can install them by placing a working 
copy of LS-DOS 6.3 in Drive :0 and enter 
DO =DTX63, and they will automatically be 
installed for you. For best results be sure 
to use a fresh work copy of your master 
LS-DOS 6.3.0 disk. You can add your other 
patches afterward. 


Once these patches are installed, to enter a 
date beyond the year 1999 you must enter 
the year as you did before; using the last 
two digits. For example, to enter January 1, 
2001 you would enter 01/01/01, or since 
with the patches we now have simplified 
date entry; 1/1/1. 


CONCLUSION 

I hope that I have helped you out in this 
"special edition" column. I hope also to have 
given you some insight into (and compassion 
for) the trials and tribulations a programmer 
must go through to get a program to run on 
more than just one machine, It can be a 
real can of worms. 


Be it as it may, in my next column I'll show 
you Orchestra-90 fans how to spiff up your 
music collection by using ORCHKEY/CMD, 
a special keystroke feeder that will allow 
you to take advantage of OIL (Orchestra 
Interpretive Language -— a  PILOT-like 
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language) to simplify your music selection, 
It emulates the "demo" programs you may 
have once seen at Radio Shack which 
advertised Orchestra-90 "live", After that 
you may want to dig out your cassette 
cables and dust your recorders off because 
next we'll enable your I/III/4/4D computer 
to digitally record and play back music and 
even your own voice! So until next time -- 
HAPPY COMPUTING! 

-David Goben 


(Editors Note) David's patches that appear 
in this issue will be included on our disk 
series number nine as usual, if you need 
these patches on disk prior to then, just 
send $2.00 to pay for postage and disks 
costs and we will send you a special copy 
of the patches, And don't forget that the 
File Cabinet has 81 disks with  pre- 
programmed music selections. With the 
average of 20 song programs per disk that 
would make about 1620 music selections 
waiting to be played on you TRS-80, with 
more selections coming in the future, And 
with David's upcoming articles more of us 
might get the music bug, 


We had two of the Orchestra-90 RS Cat. 
#26-1922 for sale. There were many 
disappointed users who missed out because 
we just didn't have enough to go around for 
all the people who wanted one, The RS 
1986 catalog was the last catalog ($79.95) 
we found this unit in, and they have become 
very scarce, we even let the one we were 
hanging onto for ourselves go. (One less 
disappointed user.) What did it do? It 
allowed you to create your own electronic 
musie and sound effects and play it on your 
home stereo, or tape cassette recorder, 


Maybe some of you hardware hackers can 
come up with a home _ grown unit to 
accomplish the same task as the Tandy unit 
did. If you come up with the hardware, | 
know that one of our expert programmers 
can come up with the software. If not, we 
may hear a "Swan Song" for the 
Orchestra-90 fans. Let us know if you have 
any ideas, CN-80 will be happy to assist 
you in the distribution and marketing of 
such a product, or publishing a "How to 
build your own" design and instructions, 


CAR MAINTENANCE PROGRAM REVIEW 
CN80 Staff Review 


Last month we promised you a look at a car 
maintenance program called “Auto-Support" 
that was written by Jerry McAllister and 
Henry Leno. Henry Leno is in the Navy and 
submitted the program to us to publish or 
review. The program is written in Basic 
and only runs under DosPlus Ver. 3.9, 
however we ran it using LDOS 5.3 and it 
ran quite well with the exception of a few 
line errors. We feel that the author or 
another programmer could rewrite the 
program with very little effort so that it 
could work under LDOS 5.3 or a later DOS. 
As it stands there are 17 pages of basic 
program, much too long to be printed here, 
(The program will be available on our disk 
number nine, and perhaps a version that will 
run on a dos other than DosPlus.) 


All in all the concept of the program 
intrigued us, It comes in 5 BASIC program 
modules, The first is the data base 
initializer which you run first to set up the 
other programs to fit your own auto or 
truck, 


The program and its menu is 
self-explanatory, and at this point has no 
documentation, but after running it through 
once on a trial basis, we found that there 
really wouldn't be any need for any 
documentation, except maybe it needs a 
readme file to explain the start up 
procedures, 


Entering the present Odometer mileage, and 
either using the maintenance checks that 
are prewritten or changing them to your 
own liking, the program then proceeds to 
the main menu, where you enter your gas 
purchases; date, odometer mileage, and 
amount of gas purchased, and then proceeds 
to tell you the miles per gallon for each 
fillup, Assuming that you entered your gas 
purchases for a month and then ran the 
program it will calculate and tell you how 
many miles you are getting per gallon for 
the month, It also has the ability to accept 
either entries in gallons or liters. 


A monthly or anytime you choose, reading 
the menu for maintenance data will give 
you what maintenance items are due and 
what items are past due and need to be 
done, 
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One disk backed up from the original disk 
and initialized for each vehicle would serve 
as a good maintenance control, The program 
displays the data on your screen or prints 
the records to give you a_ printed 
maintenance record for each vehicle, 


Mr, Leno first asked that we list the 
program and anyone who liked it could send 
$10 to him and he would send them a copy. 
To clarify our policy, we wrote back that if 
he wanted to sell the program then he 
would have to advertise it in our ad section 
and that we would write a review of the 
program, His reply was "I am not interested 
in selling my "“Auto-Support" program, but 
rather interested in sharing information and 
programs with others like myself who still 
use and appreciate the TRS-80 Model 
1/111/4/4P computers, Having said that please 
find enclosed my diskette containing the 
full "Auto-Support" program, I would like to 
have it placed in public domain, The reason 
I requested $10 initially for it was just to 
cover postage and handling. By placing it in 
public domain, that job is done for me. The 
diskette is formatted using DosPlus Ver, 3.5, 
42 cylinders, single sided double density, no 
password, The only stinulation is that it 
needs DosPlus Ver 3.5 to run, If another Dos 
is used, the program will error out on the 
'INPUT@' lines. I would like to see these 
programs printed in your magazine, or at 
least a review. This was my first major 
software undertaking and it is kind of 
sentimental, if you know what I mean!" 


CN80 would like to suggest that even 
though Mr. Leno has placed his program in 
the public domain, that if you like the 
program and use it, that you treat it as 
shareware and donate $10 to the author for 
his work, In any event some of you who like 
to work in Basic might enjoy updating it to 
work under LDOS or LS-DOS. -CN80 
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USING THE WORD PROCESSOR’ TO 
LAYOUT DIAGRAMS FOR YOUR BASIC 
PROGRAMS. 

by Robert L. Mensch, PE 


Have you ever tired of the tedious task of 
counting spaces to get your PRINT and 
PRINT TAB text and symbols to appear at 
the right spot on the video or printed page, 


Now I have an easier way. Just use your 
word processor and make the layout on the 
screen as if you were writing on a blank 
sheet of paper. I am using DISK:SCRIPSIT, 
but any word processing program should 
work, 


1001 PRINT " ‘i 
1002 PRINT " - 
1003 PRINT " (BLANK SCREEN) : 
1004 PRINT "<---80 columns max--->" 
1005 PRINT " including quotations " 
1006 PRINT " ‘ 


STEP 1. Use your word processing program 
to create a blank screen with quotation 
marks at L and R margins of desired area, 
If you want the BASIC program to put the 
display on video then limit width between 
the quotation marks to 78 columns and 
length to 22 lines. Be sure to put an 
end-of-line marker after each quotation 
mark at the R margin. For display widths 
greater than 66 columns, set your window 
width, so the line numbers and PRINT can 
be shifted off to the left out of sight. Hint: 
Use Block Command to repeat the top line 
as many times as needed, then correct the 
line numbers, 


1001 PRINT " : 
1002 PRINT "* |. mE 
1003 PRINT "* rT GIZMO i 
1004 PRINT "* /\ Je----D /\ [" 
1005 PRINT "* <------------ Rae 


1006 PRINT "* x x x xX x x |" 


STEP 2. Make design within the blank 
screen using words and symbols in your 
word processing system. If you need some 
special symbols, then you must. write 
additional BASIC statements to print them 
to screen or paper before or after this 
design is printed, 


STEP 3, Save the DESIGN shown in step 2 
in ASCII and then RUN the program in 
BASIC. 


Vol 3 No.4 Page 18 


The screen should look like this: 


* 

* T clzmo T | 
* /\ j----E/\ | 
to Rice gehanes > | 
* | 


STEP 4. If you want to make your design 
flash ON and OFF then add the following 
lines to your program: 

10 CLS 

20 FOR T=1 TO 500: NEXT T 

1010 FOR T =1 TO 1000: NEXT T 

1020 CLS: GOTO 20 


STEP 6, OH, you want to shift the whole 
design to the center of the screen. Insert 
line '30 PRINT@ (15,30)' and Use_ the 
GLOBAL command to replace the word 
'PRINT' with "PRINT TAB(30)'. Now your 
screen may look like this, depending how 
you set the window, 


1001 PRINT TAB(30) TAB(30) 
1002 PRINT TAB(30) 


I | a 


1003 PRINT TAB(30) "* | GIZMO | 
|" 
1004 PRINT TAB(30) "* / \ j----£ / \ 


1005 PRINT TAB(30) "* <.----------- > 


1006 PRINT TAB(30) 

"eX xX X xX xX xX _ |" 
Don't forget to save your new program in 
ASCII. Try RUNning it in BASIC. 


This method is certainly a lot faster than 
using the video display worksheet and 
counting squares and calculating many TAB 
statements. 


Robert L. Mensch, PE 
Consulting Agricultural Engineer 
2500 Albion Avenue 

Fairmont, MN 56031 

(507) 235-9151, 


BIGPRINT/ONE and BIGPRIN‘I/ i WU 
by Jack H. Haren 


I was. intrigued by Danny Mullen's 
VCRGEM10/BAS program in the November 
issue of Computer News 80, It seemed to 
offer a challenge to be expanded well 
beyond what it was designed to accomplish. 
Since I am constantly on the lookout for 
program's to write, this seemed like a 
welcome opportunity. 


The result was BIGPRINT/ONE and 
BIGPRINT/TWO (see program listing one) 
both of which have the following features: 


(1) Ability to print numbers, letters and 
special characters !"#$% &'()*=:-@+;<>?, /. 
(2) Choice of either horizontal or vertical 
printing. 

(3) Unlimited 14 character lines (13 on some 
printers) when using horizontal printing. 

(4) Unlimited width for 7 lines when using 
vertical printing. 

(5) Either automatic or user line formatting. 
(6) Left, center or right line justification. 
(7) Half character centering when _ using 
horizontal printing. 

(8) Preview of the sign or labels before 
printing. 

(9) Automatic centering of the seven lines 
when using vertical printing. A single line 
of text will be placed on line 4, the center 
line, 2 lines of text will be placed on lines 
3 and 5 while 3 lines will be placed on lines 
2, 4 and 6, 

(10) Printing of one or more labels of 1 to 5 
characters each, 


BIGPRINT/ONE was written to work with 
the GEMINI-15X printer which I use at 
home and other printers which have BLOCK 
Graphic capabilities. Everything went fine 
until I tried to move the program over to an 
MS-DOS computer that was connected to an 
old EPSON printer which didn't have the 
block graphics capability of my GEMINI. 
Conversion to GW-BASIC was easy but the 
Epson printer was another matter because I 
was forced into an area new to me, Dot 
Graphics. After a considerable struggle the 
necessary modifications were added and the 
new program BIGPRINT/TWO worked on 
either the GEMINI or EPSON printer. Since 
BIGPRINT/ONE which  uses_ the © block 
graphics runs much faster, I have included 
BIGPRINT/ONE as well as BIGPRINT/TWO 
which uses Dot Graphics. You can use which 
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ever one works with your printer, 
PROGRAM OPERATION 


After typing RUN, the program warns the 
user to turn on the printer, 

You are then asked to answer the following 
formatting questions: 


"Are you printing signs or labels? (S/L)" 
If labels, some of the following questions 
are skipped. 


"Please select Left, Center -or Right 
Justification (L/C/R)." 


"Enter the desired text." 


There is a limit of 255 characters, 


User format control is accomplished by 
using a backward slash (\) <CLEAR></> in 
place of a space between words where you 
want a line to end, 

Blank lines can be created by using two 
backward slashes (\\). 


"Do you want’ Horizontal or Vertical 
printing? (H/V)?" 


A PREVIEW of the sign or labels is then 
displayed on the screen followed by: 
"Is the format OK (Y/N)?" 


If the answer is "Y" the sign is printed, If 
"N", you are asked, 


"Another? (Y/N)" 


That's all there is to it. After a few 
minutes playing with the program, you will 
be an expert and won't even use any paper 
until you have an acceptable sign ready to 
be printed, 


PROGRAM NOTES 


Because descriptive variable names are used 
and the various routines in the program are 
identified with remark lines, I will not 
spend a great deal of time explaining how 
the program works, There are however, a 
few things which may be of interest. 


The 9000 series of DATA lines contain the 
codes which are used _ to- construct 
characters line by line. Ten codes are used, 
each one representing a particular 
geographic block used _ to _ build’ the 
characters, 0 represents a blank block while 


9 is a solid black block, 1 through 4 are 
lower right, lower left,, upper right and 
upper left triangles. 5 and 6 are left half 
and right half blocks while 7 and 8 are 
upper half and lower half blocks, These are 
read into array A$( ) at lines 120 and 130 
in BIGPRINT/ONE or lines 110 and 120 in 
BIGPRINT/TWO. You may wish to modify 
the type font or to substitute graphics of 
some sort for some of the _ special 
characters. Since you know the codes used, 
changes to the DATA stored in the 9000 
series of lines is easily accomplished. 


BIGPRINT/ONE converts those codes to the 
ASCII codes for GEMINI block graphics, At 
line 100, the DATA from line 110 is read 
into arrays VPC( ) AND HPC( ). Array HPC( 
) is for Horizontal Print Control and VPC( ) 
is for Vertical Print Control. These ten 
ASCII codes correspond to the ten 
character codes zero through nine which 
are used to construct the characters on the 
9000 DATA lines, 


BIGPRINT/TWO required six dot graphic 
codes to create the equivalent of a single 
block graphic code, Twenty sets of these, 
ten for horizontal and another ten’ for 
vertical printing are on the 8000 series 
DATA lines, These are read into array PIN( 
) at line 100. 


Of special note is function FNUC$(X) on 
line 90. I don't remember where I learned 
about this function but have used it in many 
programs, In order to understand how it 
works, you must have a little knowledge of 
how the computer treats BASIC comparative 
statements, When the statement is TRUE 
the computer generates a -1 in its place, 
(Try this on your computer in BASIC by 
typing PRINT 1 = 1). When the statement is 
FALSE a zero is generated (Type PRINT 1 = 
2). When two comparative statements joined 
by AND exist as in FNUC$, if neither or 
only one is TRUE the total statement is 
considered FALSE and a zero is generated. 
If BOTH are TRUE then a -1 is generated. 
When 32 is multiplied by a zero (FALSE), 
the result is zero but when multiplied by -1 
(TRUE) the result is -32. If the character 
under consideration is a lower case alpha, 
-32 will be added (or if you prefer, +32 will 
be subtracted) and the resulting ASCII will 
be the upper case equivalent of the 
character, If the character is not a lower 
ease alpha, zero is added and no change 
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takes place, This function is used on text 
entries and to modify answers to questions 
to assure upper case, 


If you have trouble printing the 14th 
character when using the Horizontal mode, 
change line 2030 to CHAR.MAX = 13. 

-Jack H. Haren 


(Editors Note) Due to the length of these 
two programs only the BIGPRINT/TWO has 
been printed in this issue, And because it 
worked quite well on our Panasonic printers 
in the Epson FX80 mode. BIGPRINT/ONE 
for the Gemini printer will be available on 
our Disk Series Number 9 which will cover 
the programs printed in the April, May and 
June issues, or by advance special purchase 
if you don't want to wait for number 9, 
$2.00 please, to cover disk cost and mailing. 
We thank Mr. Haren for sharing his work 
with us and for his continued support of the 
TRS-80, It is efforts such as his and Danny 
Mullen's and others that will keep the 
TRS-80 computers working long into the 
future with new and interesting 
applications, It goes without saying that 
there is a great deal of pride and 
satisfaction in being able to say "look what 
I can do with my computer, I wrote that 
program", Try saying that about a MS 
computer, without relying on their fixed 
application programs, -Ed. 


CHECK WRITER PROGRAM 
by Elton Wood 


For the past several years I have been 
involved in the management and 
administration of a small non-profit water 
system, In conjunction therewith I have used 
my Model 4 and LeScript word processor as 
the tools for printing the monthly accounts 
payable checks, While the work processor 
approach has served well, I always had in 
the back of my mind that someday I should 
develop a check writing program, however 
lack of motivation and inspiration left the 
project undone, 


Well, along comes Issue 26 of CodeWorks 
magazine which contains a program entitled 
"Ckrite.Bas", written by editor Irv Schmidt 


for the MS computers. This program takes 
an integer dollar amount and changes it to 
the equivalent words used in writing checks, 


A detailed study of this program provided 
the necessary stimulus for brainwork and 
efforts, as I incorporated the concept of 
Irv's program as a_ subroutine into a 
finalized check writing program, 


The enclosed program listing (see program 
listing number two) and diskette which is in 
ASCII, is written for a TRS-80 Model 4 and 
is the result of this effort. It is provided 
for your perusal and disposition. My 
experience indicates that there are about as 
many ways to code a program as there are 
people who write them and that most people 
who have enough interest to type in a 
program will incorporate some of their own 
personal touches, Therefore, I think the 
program is remarked sufficiently so as to be 
self-documenting, It obviously has somewhat 
limited application but I have found it to be 
most useful as the tool for the purpose [| 
intended. If not to practical for many, it 
may at least be of some amusement value, 
-Elton L. Wood 


(Editors Note) You will find an 
advertisement in the Product Source of this 
issue where CodeWorks is offering its first 
four years of CodeWorks magazine which 
were written for the TRS-80 Model III and 
IV along with the programs on disks, We had 
the idea since CodeWorks has now changed 
its support to the MS computers and 
GW-Basie that many of you may not be 
aware that there were many good programs, 
plus good instruction in Basic programming 
provided by CodeWorks in its first four 
years of publication. So we called Irv 
Schmidt and discussed the idea that he 
should not let those years of productive 
work just revert to never-never-land and 
that there were many of our subscribers 
who would be interested in knowing about 
the CodeWorks TRS-80 programs, Because 
many of our subscribers are new owners of 
their TRS-80 computers or were perhaps 
unaware of CodeWorks. The _ resulting 
advertisement and effort by Irv to keep his 
programs available to the TRS-80 user is 
the result of that conversation and is 
greatly appreciated by all of us TRS-80 
users, 

-Ed., 


Vol 3 No. 4 Page 21 


OPEN FORUM 


oe emp ee ee ee ow ow oe ee oe ow ow 


Q: I haven't been able to get David 
Goben's Model III enhancements software in 
the January issue to create a command file 
from Basic. Well, actually it creates the 
file, but writes nothing to it, as though it's 
not reading the data lines, 

H. A. B. Jacksonville, FL 


A: At the end of Line 70 in both programs 
change 

;GOTO 00 

to 

Print#1,CHR9(A);:GOTO 50 
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Q: In Vol 3 No, 2 page 2 you had a hint on 
Deskmate date upgrades, I tried this on my 
Model 4P and it went fine until I go to the: 


SET *CL COM <ENTER> 


When I did this I got the message "program 
not found", I would appreciate it if you 
could help me figure out. what I didn't do or 
what I did do wrong. 


I really enjoy your magazine and appreciate 
your efforts in getting us something 
worthwhile for us to use with our Model 
4's, 

-R. G. B. Stuttgart, AZ 


A: You did nothing wrong. For the Set *CL 
COM to work the COM/Drive program must 
be on the disk you are working on, If the 
COM/Driver program does not exist, then 
you do not need to use the SET *CL COM 
command step in our suggestion to upgrade 
your Deskmate. The one thing we left out 
was the DATE/CONV, that should be, but 
not necessary, last step. This command 
updates your existing programs that were 
stored on DATA storage disks with the new 
dating, if not used on your old data disks 
you may get garbaged dates when you read 
the directory of the older files, but nothing 
will happen to the data that you stored in 
those programs. 


LTR: The File Cabinet Library disk MD4 
Business Volume 17 has a Special Occasion 
program in which you can enter all your 
friends' special events for the year. 


It has a menu which shows: add occasion; 
delete occasion; or display listing. The 
display listings then asks for the month you 
would like displayed. After entering the 
month desired, it shows the name, date and 
occasion for each person entered, This can 
then be printed for the month's reminder 
list so you don't forget someone important 
to you, 


It is a rather handy and _ convenient 
program, 


However, I was not able to change or delete 
and entry after it wa once entered, Perhaps 
someone could solve this problem for us, 

H. P. A. Coldwater, MI. 


A: We would welcome any readers efforts 
to rewrite this program to allow for editing 
of the entries. We will even send you a 
copy of the program to work with if you 
don't have one, One solution we think of 
(untried because of lack of time at this 
point) is to use TED to edit the data 
storage file that this program would set up. 


-LTR: I would like to make a suggestion for 
a new column in CN80, which I read from 
cover to cover as soon as it arrives, I 
would like to see a Hints and Tips column 
where the readers could write in their "how 
to do it tips, patches and so forth", 


There would be a great advantage to those 
of us users who could read about how 
someone else solved a problem or patched a 
program, Maybe you could have a hint of 
the month contest. With the best hint being 
listed first and with some sort of prize 
being offered each month, 

K. P. Boston, MA 


A: We are all for that. We have run a 
hints and tips section since the beginning of 
CN80, the only problem is that we have had 
to author all the hints and tips. We would 
be more than willing to provide 25 free 
disks to the Hint and Tip winner of the 
month, So charge up your word processors 
and get the ideas flowing. 
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One request however, please put your hint 
on a disk in ASCII format, And please label 
the disk with the format used, and which 
Basic you are using. We have received 
articles with hard copy printouts and disks 
with no labels, It is very easy to get the 
disks mixed up with other unlabeled disks, 
then we have to spend time to match the 
disks up with the proper author, 


While we are on the Subject of submissions 
please help us by following these simple 
rules, 


1. Provide a hard copy of your article, 
letter ete. It does not need to be double 
spaced, 


2. Provide your letter, article, hint and tip 
text, etc. on a disk in ASCII format. If you 
are unfamiliar with how your’ word 
processor stores files in ASCII format drop 
us a note and we will help you, or just send 
us your original file - but please tell us 
what word processor you used and what 
DOS was used to format the disk. 


3. Always save your BASIC programs in 
ASCII to a disk, and label the disk with 
the programs name and what BASIC was 
used to write the program, 


4, Always provide a hard copy of your 
BASIC program with the disk, 


As the magazine grows, which is more 
information for everyone each month, your 
help is needed and these four simple rules 
will greatly assist us in getting that 
information to you. 


Most of all thanks to all the contributors 
for their support and submissions, 


Next month we hope to start printing the 
first part of our long overdue "How to Use 
Laser Printers with the TRS-80 Computers" 
research on this project has taken a little 
longer that we had hoped, and we want to 
make sure that the information is correct 
the first time. Your patience is 
appreciated and will be rewarded with some 
fine articles on this subject, 


Till then - Happy Computing. 


Patch Listing Number ONE -- David Goben 


. DTX63/JICL 
. Patch LS-DOS 6.3 for date extensions to Dec 31, 2911 
. David Goben, February 1999 


PATCH BOOT/SYS.LSIDOS (D95,94=CD C7 4:FQ@5,94=1A 36 2F) 
PATCH SYS@/SYS.LSIDOS DTXS963 

PATCH SYS6/SYS.LSIDOS DTXS663 

PATCH SYS7/SYS.LSIDOS DTXS763 

PATCH SYS7/SYS.LSIDOS DTXS763B (0=N) 

PATCH BACKUP/CMD. UTILITY DTXBU63 

-END -------------------------- 


Patch Listing Number TWO -- David Goben 


. DTXS963/FIX 

Extend dating for LS-DOS 6.3 to Dec 31, 2911 
.David Goben, February 1999 

Install using: PATCH SYS@/SYS.LSIDOS DTXS9#63 


DOD,5E=CD B3 21 FE 29 

FOD,5E=4F D6 50 FE 14 

DOD, C9=9F 

F@D,C9=97 

DOD, EC=BE 21 

FOD,EC=C7 04 

DOD,FE=CD 03 

FOD,FE=47 2 

DOE ,@P=21 

FOE ,@B=DC 

DOE,24=21 6C O7 85 6F 11 4F 

FOE.24=D6 29 2E 38 FE 3A 38 

DOE, 2B=21 3E 61 EF 21 4€ 21 

FOE ,2B=93 2C D6 MA 67 22 52 

D@E,32=CD 2D 95 20 OM OO OP 

FOE.32=21 21 4E 21 CD 2D @5 

DOF .9F=57 CD D8 21 38 92 AF 53 82 37 
FOF OF=5F CD 2F 21 30 04 83 5F 37 7B 
X'94C7'=1A 36 2F FE 64 D8 36 25 C9 
X'21B3'=FE OC 30 93 C6 64 12 4F D6 59 C9 
X'21BE'=53 75 6E 4D 6F 6E 54 75 65 57 65 
X'2109'=64 54 68 75 46 72 69 53 61 74 
X'21p3'=47 21 DC 04 C9 

X'21D8'=7E D6 39 FE @A DM 23 C9 

EOP eset oetee ees eee 
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Patch Listing Number THREE -- David Goben 


. DTXS663/FIX 

.Extend dating for LS-DOS 6.3 to Dec 31, 2911 
David Goben, October, 1988 

.Install using: PATCH SYS6/SYS.LSIDOS DTXS663 


D95,32=D9 94 

FQ5.32=7A 2D 

D#8,D3=DC 04 

F@8,D3=7D 2D 

D98,FB=D6 64 

FO8,FB=3E 63 

DOD,6E=7E FE OC 30 93 
FOD,6E=4A 61 6E 46 65 
DOD,73=C6 64 77 D6 5B C9 
FQD,73=62 4D 61 72 41 79 
DOF ,89=CD 7D 2D 

FOF 89=7E D6 59 

SBOP! seuteee teresa cease 


Patch Listing Number FOUR -- David Goben 


.DTXS763/FIX 

Extend dating for LS-DOS 6.3 to Dec 31, 2911 
.David Goben, February 1999 

.Install using: PATCH SYS7/SYS.LSIDOS DTXS763 


.f1x DATE 

D@5,44=CD 15 27 

FQ@5,44=1A D6 50 

DQ5,4B=20 

FQ5,4B=14 

DQ5,B2=@F 

FQ5,B2=97 

DQ6,0@4=21 6C @7 85 OF ll 
F96,94=D6 50 FE BA 38 99 
DQ6,9A=45 27 3E 61 EF 18 Q7 
FQ6,MA=47 3E 39 32 48 27 78 
DQ@6,FE=57 

F06,FE=5F 

D@7,99=28 27 OP OD 82 
FO7,@D=FO 25 30 04 83 
DQ@7,39=1A FE @C 30 03 
FQ7,39=4A 61 6E 46 65 
DQ@7,3E=C6 64 12 D6 59 C9 
FQ7,3E=62 4D 61 72 41 70 
D@7,44=CD F@ 25 D8 AF 53 2B C9 
FQ7,44=72 4D 61 79 4A 75 GE 4A 


Fix PURGE 

D19,39=DC 94 

F19,30=03 29 

D19,51=E 37 OC D6 OA 30 FB 
F19,51=FE QA 38 QA BE 39 D6 
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D1G,58=C6 A 47 CD GE 29 OP 
F19,58=9A FE QA 38 2 3E 99 
D12,@B=CD 93 29 

F12.@B=7E D6 59 

D13,1A=7E FE @C 30 03 C6 64 
F13.1A=4A 61 6E 46 65 62 4D 
D13,21=77 D6 58 C9 79 FE 3A 
F13.21=61 72 41 79 72 4D 61 
D13,28=38 93 D6 MA 4F 78 C9 
F13.28=79 4A 75 6E 4A 75 6C 
GOP icetueeeeee2ece ae eecue 


Patch Listing Number FIVE -- David Goben 


.DTXS763B/FIX 

.Extend dating for LS-DOS 6.3 to Dec 31, 2911 

.David Goben, February 1999 

Install using: PATCH SYS7/SYS.LSIDOS DTXS/763B (0=N) 


finish fixing DATE 
D@5,E1=DC 94 

FQ5,E1=15 27 

JCOP- sessvasoeteusotoadausle 


Patch Listing Number SIX -- David Goben 


. DTXBU63/FIX 

.Extend dating for LS-DOS 6.3 to Dec 31, 2911 
.David Goben, October, 1988 

.Install using: PATCH BACKUP/CMD.UTILITY DTXBU63 


DQ8,4B=CD DD 36 
FQ8,4B=7E D6 59 

DOD, 82=7E FE OC 30 93 
FQD,82=09 20 OP 20 OP 
D@D,87=C6 64 77 D6 58 C9 
i ede 22 2D OO 20 OO 
.EQP ------------------- 


BIGPRINT/TWO PROGRAM LISTING NUMBER ONE for the Model 4, by Jack H. Haren 


19 ' 

29 ' > > > BIGPRINT/TWO < < < 

39 ! 

49 > > > Read DATA into the arrays < < < 
59 ' 


69 CLS : PRINT@(5,17),"PLEASE STAND BY, READING DATA INTO MEMORY. . ."; 

7Q PRT$ = CHRS (27) +"@"+CHR$ (27)+"A"+CHRS (6)+CHR$(27)+"U"+CHRS$ (1) ' 6/72" line & 
unidirectional printing. 

89 DEFINT A - Z : DIM A$(7,60) , LAYOUT$(15) , HALF.SPC(15) , PIN(9,2,6) 

99 DEF FNUCS(X$)=CHRS(ASC(X$)+32*(ASC(X$)>96 AND ASC(X$)<123))'Change LC to UC 
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199 FOR X = 1 TO 9: FOR Y = 1 TO 2: FOR Z = 1 TO 6: READ PIN(X,Y,Z): NEXT Z,Y,X 


119 FOR X = 9 TO 59 STEP 109 : FOR J=11707: FORI =X TO0X+9 
129 READ A$(J,I) : NEXT I,J,X 

1999 ' 

1919 ' > > > Main Routine begins here, < < < 

1929 ' 


1939 CLS : PRINT@(5,12),"This program prints large characters using PIN GRAPHICS." 

104@ PRINT@(7,6),"Be sure that the paper or labels are adjusted and the printer is on," 

1950 PRINT@(9,27),3; : INPUT “Press <ENTER> when ready";x$ : LPRINT PRT$; 

1968 CLS : PRINT@(1@,20),"ARE YOU PRINTING LABELS OR SIGNS (L/S)?"; 

-1979 LS$ = INKEY$ : IF LS$ = "" THEN 1970 ELSE LS$ = FNUCS$(LS$) 

1988 IF LS$ = "L" THEN 112@ ELSE IF LS$ < > "S" THEN 1070 

19998 CLS : PRINT@(19,9),"Please select Left, Center or Right justification (L/C/R)"; 

1199 LCRS = INKEYS : IF LCRS = "" THEN 1100 ELSE LCRS$ = FNUCS(LCRS) 

1119 IF LCR$ = "L" OR LCRS = "C" OR LCRS = "R" THEN 1120 ELSE 1199 

1129 CLS : H$ = "" : PRINT@(19,28), “Enter the desired text." : PRINT 

1139 I$ = INKEY$ : IF I$ = "" THEN 113@ ELSE I$ = FNUCS(I$) : ASCI = ASC(I$) 

1149 IF(ASCI > 31 AND ASCI < 91) OR ASCI = 92 THEN H$ = H$ + I$ : PRINT I$; : GOTO 1139 
' This is a valid character. 

115@ IF ASCI = 13 AND LEN(H$) > @ THEN 1199 ' ASCII 13 = End of text. 

1169 IF ASCI < > 8 THEN 113@ ' This is an invalid character, 

1179 IF LEN(H$) > @ THEN PRINT I$; : H$ = LEFTS$(H$,LEN(H$)-1)' 8 = <LEFT ARROW> 

1189 GOTO 113@ 

1199 IF LS$ = "L" THEN HV$ = "H" : LCRS = "L" : CHAR.MAX = 5 : GOTO 2040 

1208 CLS : PRINT@(19,15),"Do you want Horizontal or Vertical printing? (H/V)"; 


1219 HV$ = INKEY$S : IF HV$ = "" THEN 1210 ELSE HV$ = FNUCS$(HV$) 
1220 IF HV$ = "H" THEN 2000 ELSE IF HV$ = "V" THEN 3009 ELSE 1219 
2000 ' 

2019 ' > > > Horizontal PRINT routine, < < < 

20290 ' 


2930 CHAR.MAX = 14 
2949 GOSUB 4990 
2950 IF YN$ = "N" THEN 3170 ELSE PRINT : PRINT TAB(31);"Please stand by." 
2969 FOR LN = 1 TO TOT.LINES 
2070 N = LEN(LAYOUT$(LN))*36+HALF.SPC(LN)*6 : N2 = INT(N/256) : Nl = N-N2*256 
2980 FOR CHAR.LINE = 1 TO 7 
2990 LPRINT CHR$(27) "K" CHR$(N1) CHR$(N2); 
2109 FOR X = 1 TO HALF.SPC(LN) * 6 : LPRINT CHR$(@); : NEXT X 
2119 FOR CHARACTER = 1 TO LEN(LAYOUTS(LN)) : CHAR.ASCI = 
ASC (MID$(LAYOUT$(LN) , CHARACTER, 1) ) 
2128 FOR CHAR.CODE = 1 TO 5 
2130 PC = VAL(MID$(A$(CHAR.LINE,CHAR.ASCI - 32),CHAR.CODE,1)) 
2149 FOR PIN.CODE = 1 T0 6 : LPRINT CHR$(PIN(PC,1,PIN.CODE)); : NEXT PIN.CODE 
2158 NEXT CHAR.CODE : FOR X = 1 TO 6 : LPRINT CHRS$(Q); : NEXT X 
216 NEXT CHARACTER 
2179 LPRINT 
2180 NEXT CHAR.LINE 
2199 LPRINT : LPRINT : LPRINT : LPRINT : LPRINT 
2209 NEXT LN: GOTO 3179 


3919 ' > > > Vertical PRINT routine, < < < 

3920 ' 

3030 CHAR.MAX = 18 : GOSUB 49000 

3949 IF YNS = "N" THEN 3179 ELSE PRINT : PRINT TAB(31),"Please stand by." 
3958 FOR CHARACTER = 1 TO CHAR.MAX 

3969 FOR CHAR.CODE = 1 TO 5 : LPRINT CHR$(27) "K" CHR$(223) CHR$(1); 
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3970 FOR LN = 7 TO 1 STEP -1l 

3080 IF LEN(LAYOUT$(LN)) < CHARACTER THEN FOR X = 1 TO 72 : LPRINT CHR$(@)3; : NEXT X : 
GOTO 3149 

3998 CHAR.ASCI = ASC(MID$(LAYOUT$(LN) ,CHARACTER, 1) ) 

3199 FOR CHAR.LINE = 7 TO 1 STEP -1 

3118 PC = VAL(MID$(A$(CHAR.LINE,CHAR.ASCI - 32),CHAR.CODE,1)) 

3128 FOR PIN.CODE = 1 TO 6 : LPRINT CHRS(PIN(PC,2,PIN.CODE)); : NEXT PIN.CODE 

3130 NEXT CHAR.LINE : FOR X = 1 TO 30 : LPRINT CHRS$(@); : NEXT X 

3149 NEXT LN : LPRINT 

3159 NEXT CHAR.CODE : LPRINT : LPRINT 

316% NEXT CHARACTER 

3178 CLS : PRINT@(19,35),"ANOTHER? (Y/N)"$ 

3180 YN$ = INKEYS : IF YN$ = "" THEN 3189 ELSE YN$ = FNUCS(YN$) 

3199 IF YN$ = "Y" THEN 1960 ELSE IF YN$ = "N" THEN CLS : END ELSE 31890 

4999 ' 

4919 ' > > > Subroutine to break text into lines and justify. < < < 

4920 ' 

a : TOT.LINES = @ : ERASE LAYOUTS , HALF.SPC : DIM LAYOUT$(15),HALF.SPC(15) : O$ 
=H 

4949 TOT.LINES = TOT.LINES + 1: L = Q 

4050 IF TOT.LINES > 7 AND HV$ = "V" THEN CHAR.MAX = CHAR.MAX + 1 : GOTO 4930 

496% FOR X = 1 TO LEN(0$) 

4970 IF MID$(0$,X,1) = "\" THEN L = X : X = LEN(O$) 

4980 NEXT X 

4990 IF L = @ THEN 4120 ELSE IF L-1 > CHAR.MAX THEN IF HV$ = "H" THEN L = CHAR.MAX + 1 
ELSE CHAR.MAX = L-l : GOTO 4930 

4199 LAYOUTS(TOT.LINES) = LEFT$(0$,L-1) : 0$ = RIGHT$(0$,LEN(0$)-L) 

4119 IF TOT.LINES = 7 AND HV$ = "V" THEN 50819 ELSE 4949 


4120 IF LEN(O$) < = CHAR.MAX THEN LAYOUTS(TOT.LINES) = 0$ : 0$ = ""': GOTO 5990 
4139 FOR X = CHAR.MAX+1 TO 1 STEP -1 

4149 IF MID$(0$,X,1) =" " THENL =X: X=1 

4159 NEXT X 


4169 IF L > @ THEN 423¢ 

4170 IF HV$ = "H" THEN LAYOUTS(TOT.LINES) 
- CHAR.MAX) : GOTO 4249 

4189 FOR X = CHAR.MAX + 2 TO LEN(O$) 

4190 IF MID$(0$,X,1) = " " THENL =X: X 

4200 NEXT X 

4219 IF L = @ THEN CHAR.MAX = LEN(O$) ELSE CHAR.MAX = L-1 

4220 GOTO 493¢@ 

4230 LAYOUT$(TOT.LINES) = LEFT$(0$,L-1) : O0$ = RIGHT$(0$,LEN(0$)-L) 

4240 IF 0$ < > "" THEN 4949 

5000 ' 

501d ' > > > Routine to JUSTIFY the text on each line < < < 

5020 ' 

5030 IF LCR$ = "L" THEN 6930 

5049 FOR X = 1 TO TOT.LINES 

5050 IF LCR$ = "C" THEN SP! = (CHAR.MAX - LEN(LAYOUT$(X)))/2 : HALF.SPC(X) = (SP! - 
INT(SP!))*6 : LAYOUT$S(X) = SPACESCINT(SP!)) + LAYOUT$(X) : GOTO 5979 

506@ LAYOUT$(X) = SPACE$S(CHAR.MAX - LEN(LAYOUT$(X))) + LAYOUT$(X) 

5070 NEXT X 


LEFT$(0$,CHAR.MAX) : O$ = RIGHT$(0$,LEN(0$) 


LEN(0$) 


6919 ' > > > Routine to adjust line spacing of Vert. printing layout. < < < 
6920 ' 

6930 IF HV$ = "H" THEN 7930 

6040 ON TOT.LINES GOTO 6059, 6960 6070, 6989 , 6989, 7030, 7930 
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6959 LAYOUT$(4) = LAYOUT$(1) : LAYOUT$(1) = "" : TOT.LINES = 4 : GOTO 7939 

6968 LAYOUT$(3) = LAYOUT$(1) : LAYOUT$(1) = "" : LAYOUT$(5) = LAYOUT$(2) : LAYOUT$(2) 
“" s TOT.LINES = 5 : GOTO 7930 

6978 LAYOUT$(6) = LAYOUT$(3) : LAYOUT$(3) = "" : LAYOUT$(4) = LAYOUT$(2) : LAYOUT$(2) 
LAYOUT$(1) : LAYOUT$(1) = "" : TOT.LINES = 6 : GOTO 7939 

6989 FOR X = 6 TO 2 STEP -1 : LAYOUT$(X) = LAYOUT$(X-1) : NEXT X : LAYOUT$(1) = "™ ; 
TOT. LINES = 6 

7999 ! 

7019 ' > > > Routine to eliminate trailing spaces from text < < < 

7920 ' 

7030 CW = CHAR.MAX : CHAR.MAX = @ 

7949 FOR X = 1 TO TOT.LINES 

7950 IF LEN(LAYOUT$(X)) > CHAR.MAX THEN CHAR.MAX = LEN(LAYOUTS$(X)) 

7969 NEXT X 

7979 PRINT@(5,24),"Here is a preview of your layout"; 

7989 PRINT@(7,@),3 

7099 FOR X = 1 TO TOT.LINES | 

at IF CW > 80 THEN PRINT LAYOUT$(X) ELSE PRINT TAB((89-CW)/2) ;LAYOUTS(X) 

NEXT X 

712@ PRINT : PRINT TAB(29); "Is the format ok? (Y/N)" 

7130 YN$ = INKEYS : IF YN$S = "" THEN 7139 ELSE YNS$S = FNUCS(YNS) 

eh IF YN$ = "Y" OR YNS = "N" THEN RETURN ELSE 7130 

8 i] 

8018 ' > > > PRINTER PIN CONTROL CODES < < < 

8920 ' / HORIZONTAL \ / VERTICAL \ 

8938 DATA 1, 3, 7,15,31,63, 63,31,15, 7, 3, 1 

8049 DATA 63,31,15, 7, 3, 1, 63,62,60,56,48, 32 

8950 DATA 32,48,56,69,62,63, 1, 3, 7,15,31,63 

8069 DATA 63,62,69,56,48,32, 32,48.56.60,62,63 

8979 DATA 63,63,63, 0, 9, @, 56,56,56,56,56, 56 

8980 DATA @, @, 0,63,63,63, 7,7, 7, 7, 7, 7 

8990 DATA 56,56,56.56.56.56. 9, B, 9,63,63,63 

8100 DATA 7, 7, 7, 7, 7, 7, 63,63,63, 0, O, B 

8119 DATA 63,63,63,63,63,63, 63,63,63,63,63,63 

9960 ' 

9970 ' > > > Character DATA < < < 

9989 ' 

9999 ' ASCII CHARACTERS 32 - 41 

91908 ' S/SPCOVNS ENS "NS FENI SNS BENT ANIINNI OND N 

9119 DATA PPPBD,9D9DD , 09099 , B9D9D , PD99A , 99965, 19209, 99900, 09999 , D9D9— 

9120 DATA BPDDD, 9D9DD , 29999 , 9999, 19992 , 99999 , 99990 , 99900, 09659, 96590 

9130 DATA 99PDP, GD99D, 89099, 99999 , 99999, 09650, 39499 , 99490, 90909, 92990 

9149 DATA PPPDP , GH9DD , GPODD , 9999 , 39992 , 9H99P, 19299 , P9090, 90990, 99900 

9159 DATA PPPDP, POPDD , PODDD , 99999 , BP9D9 , P6509 , 99965 , PDPDP , 09999 , P9990 

9169 DATA D9DOD , BADDO , BADDO , B9D9D , 39994 , 99999, 99390 , G9D00, 99650 , 96590 

et DATA PDDBD , ODIDD , DOPOD , 99D9D , BH9DP , 65999, 39949 , PP99D, A999 , 09990 

9199 ' ASCII CHARACTERS 42 - 51 

9200 TENT ANS pg NID ONS ee NI INI AN I ANTONI SN 

9219 DATA 90999, 00000, 00000, PP9B0, 99000, 90965 , 19992 , 89199, 19992,19992 

9229 DATA 99999, GD99B , POPDD , DODOD , PO90P , 02090, 90009, 91990, 99999, 99999 

9230 DATA 99999, P2991, BODDD , 0DDO0 ,BPPPD, 99659 , 99999 , 09999, 99914, p0pp4 

9249 DATA 96959 , 99999, 899GD, 99999 , PADD, BD9IDD , 99909 , 90909, 99140, 99992 

9258 DATA 99999, 09990, 09999, 09009, 99000, 96509, 99999, 99990,01499, a9999 

9269 DATA 99999, 9299D , 2B9DD , DPDDD , 99999 , BIDDD , 99099 , 09900, 14909 ,99999 

9270 DATA BP9D—D , BODOD , 99400 , DAO , 09900 , 65090 , 39994 , 99999 , 99999, 39994 
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9289 
9299 
9390 
9319 
9320 
9339 
9349 
9359 
9369 
9370 
9389 
9399 
9490 
9419 
9429 
9439 
9449 
9459 
9460 
9479 
9489 
9490 
9500 
9519 
9520 
9530 
9549 
9550 
95690 
9579 
9589 
9599 
9690 
9619 
9629 
9639 
9649 
96590 
9669 
96/9 


ASCII CHARACTERS 52 - 61 

" JANSSENS ENFZTINI BNI ONA ENA SNA SN GEN 
DATA 9198, 99999, 19992, 99999, 19992, 19992, 99099, 19999, 99149, 99990 
DATA 91499 , 9DDDD , 99999 , BBDDI , 9DDD9 , 99009 , DAPHP , 09990, 91400, DADA 
DATA 14999 , 90000, 90900 , 00014 , 30004 , 99009 , 99990 , P9900, 14909, 99999 
DATA 99999. 39992, 99992. 99149, 19992, 39999 , 99999, 99999, 99990, BpaR0 
DATA 99999 , GBDD9 , 999D9 ,B149D, 99999 , BADD9 , BHDDD , 99909, 32009, 99999 
DATA 99D9B , 99DD9 , 99DH9 , 14990 , 99909 , 99999 , 99999, 90999, 93200, 92000 
DATA 99999, 39994, 39994, 9999, 39994 , 39994 79999, 99499, 99320, B9D00 


ASCII CHARACTERS 62 - 71 

LANA ENA ON TANT BENG ENT OUANI ENS FAT GN 

DATA $329, 19992, 19992, 91929, 99992, 19992, 99928, 99995, 99995, 19992 
DATA 99320, 99909 , 94909 09999 , 65099 , 99999 65932 , 65900, 65990, 99900 
DATA 99932 , 09999 , 9019, 65965, 65004, 99900, 65909, 65999, 65909, 99990 

DATA 99999, 99194 , 99999, 99999, 69992, 99909, 65999, 6999969999, 99999 
DATA 99914, 99999, 99394 , 99999 65999, 99900, 65999, 65999, 65999, 99999 
DATA 99148 , 90000, 92001 , 99999 , 65099, 99909 , 65914 , 65990, 65090, 99999 
DATA 91499, 99999, 39994 , 999G9, 99994, 39994 99949, 99999, 95999, 39994 


ASCII CHARACTERS 72 - 81 

"  FHANJZINSJ INS KVNSJLENSIJMNSINVNSONSPNV/Q\ 
DATA 99909 , 89999 96995, 99914 , 98900, 95969, 95999, 19992, 99992, 19992 
DATA 99909 , 00909 , 99090, 90149, 99099, 99999 99999, 99909, 65999, 99999 
DATA 99909 , 00990, 09099 ,91499, 99990, 96959, 96599, 99999, 65999, 99999 
DATA 99999 ,BB99D, BDD9D , 99900 , 9DDBD , 99999 , 99999 , 99999 , 69994 , 99999 
DATA 99909 , 82990, 99099 , 93209, 99000, 99099 , 99659, 90909 65909, 99999 
DATA 99909 , G0900 , 90990, 99320 , 99900, 99099 99999, 99999 , 65999, 99999 
DATA 99999 , 99999, 39949, 9993299999, 99999, 99969, 39994, 95999, 39954 
ASCII CHARACTERS 82 - 99 

" FRNIS\VNSITNSJUNSFVNSWNS XNA YN ZZ \ JDMY\ 
DATA 99992, 19992, 99999 , 99909, 90009 , 99099 , 65965 , 99999 69995, BpDR— 
DATA 65999 , 99009 , BD9DD , 99909 , 99909 , 99909 , 99990 , 65965 , 99090 , BND00 
DATA 65999 , 99009 , AH99D , 99009 , 99909 , 99909 , 96950 , 09990 , 99650, BpD—— 
DATA 69994, 39992 , 0900 , 99909 65965 , 99909 , 00900, 96950, 99900, A000 
DATA 65999, 02009 , B99BP, 99999, G9999, 96959, 96959 9909, 96599, agape 
DATA 65965 , 99809 , BB990 , 90909 , 96959, 99999 99999 , 90990, 29900, DAB0— 
DATA 95999, 39994 , 90990, 39994 99990, 65965, 65965, 99999, 69995, BpDR0 
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CHEKRITR/BAS PROGRAM LISTING NUMBER TWO for the Model 4, by Elton Wood 


199 ' WOODCHIP Software 
119 ' Basic Code Programs 
120 ' Elton L. Wood 

130 ' 2536 W. Old Hwy Rd 
149 ' Morgan, Utah 84959 


158 ' Check Writer (CHEKRITR/BAS) (*** Dec 1989 ***) 


169 ' For TRS-8@ Model 4 

179 ' Concept in Lines 639 to 949 taken from CodeWorks Magazine (Issue 26) 
a Input check amount as a numeral and it will be converted to words 

99 


20 POKE &HB94,PEEK(&HB94) OR 8 ' Enable Special Character Codes Without Toggle 
219 PRINT CHR$(15);: ' Turn cursor off 


229 
230 ' Define important variables 
249 ' C Sets starting column to print pointer 


250 ' R Sets starting row to print pointer 

269 ' ML Sets maximum length for inkey input routine 

279 ' PO Sets print @ position for inkey input routine 

280 HP$=CHR$(191)+CHR$(244)+CHR$(245)+CHR$(246) ' Creates Hand Pointer 

299 HE$="" " ' Erases Hand Pointer 

309 LE$=STRINGS(68," ") ' Erases line 

319 DIM MI$(14) ' Sets array size for number of menu items (Payees, etc.) 

320 DIM Z$(27) ' Sets array size for numbers to words 

339 ' 

348 GOTO 999 

359 ' 

369 ' Inkey input subroutine 

370 PRINT @(28,3),HPS; 

388 PRINT @(21,@),CHR$(191);: PRINT @(21,79) ,CHRS$(191); 

399 A$="": L=@: PRINT @PO,STRINGS(ML, 46); 

490 I$=INKEY$: IF I$="" THEN 409 

419 IF I$=CHR$(13) THEN RETURN 

420 IF I$=CHR$(9) OR I$=CHR$(19) THEN 499 

430 IF I$=CHR$(8) AND L=@ THEN 409 

449 IF I$=CHR$(8) THEN L=L-1: PRINT @PO+L,CHR$(46);: AS=LEFTS(A$,L): GOTO 409 

459 IF ML=L THEN 409 

460 PRINT @PO+L,I$;: AS=A$+I$: L=L+1: GOTO 409 

479 ' 

489 END ' Payee data items subroutine (Replace with payees of your choice) 

499 DATA PAYEE NUMBER ONE,PAYEE NUMBER TWO,PAYEE NUMBER THREE,PAYEE NUMBER FOUR, 
PAYEE NUMBER FIVE,PAYEE NUMBER SIX,PAYEE NUMBER SEVEN 

509 DATA PAYEE NUMBER EIGHT,PAYEE NUMBER NINE,PAYEE NUMBER TEN, PAYEE NUMBER 
ELEVEN,PAYEE NUMBER TWELVE 

519 DATA TYPE YOUR OWN,EXIT TO DOS 

529 RETURN 

530 ' 

549 END ' Read words subroutine (For conversion of numbers to words) 

550 DATA ONE, TWO, THREE,FOUR,FIVE,SIX,SEVEN 

569 DATA EIGHT,NINE, TEN, ELEVEN, TWELVE, THIRTEEN 

579 DATA FOURTEEN, FIFTEEN, SIXTEEN, SEVENTEEN 

580 DATA EIGHTEEN,NINETEEN, TWENTY, THIRTY ,FORTY 

599 DATA FIFTY,SIXTY, SEVENTY, EIGHTY, NINETY 

699 FOR Z=1 TO 2/7 
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619 READ Z$(Z) 

620 NEXT Z 

639 ' 

649 ' Convert number to words subroutine 

659 IF ZA>99999 .99999990019# OR ZA<.@1 THEN END 

660 ZA#=ZA 

670 IF INT(ZA#)<>ZA# THEN ZA#=ZA#+. 995 

689 ZA$=STR$(ZA#) 

699 IF INT(ZA#)=ZA# THEN ZA$=ZA$+".00" 

709 ZF=INSTR(ZA$,"@"): IF ZF<O@ THEN MID$(ZA$,ZF,1)="0": GOTO 700 
710 ZX=INSTR(ZA$,".") 

72Q ZA$=LEFT$(ZA$, ZX )+MID$(ZA$, ZX+1,2) 

739 IF LEFT$(ZA$,ZX)="_." THEN ZA$="0"+RIGHTS$(ZAS, 3) 
749 ZC$=MID$(ZA$, ZX+1, 2) 

759 IF LEN (ZC$)=1 THEN ZC$=ZC$+"0" 

769 IF ZC$="00" THEN ZC$="NO" 

77@ ZY$="& "+ZC$+"/100" 

789 ZB$=STRS(INT(ZA#) ) 

799 ZB$=RIGHT$(ZB$,LEN(ZB$)-1) 

890 ZL=LEN(ZBS) 

819 FOR Z=1 TO ZL 

828 2Z(Z)=VAL(MID$(ZB$,Z,1)) 

830 NEXT Z 

849 Z=Z-1 

859 IF Z(Z-1)=@ THEN ZZ$=Z$(Z(Z)) 

860 IF Z(Z-1)=1 THEN ZZ$=Z$(Z(Z)+19) 

870 IF ZL=1 THEN 959 

880 IF Z(Z-1)>1 THEN ZZ$=Z$(Z(Z-1)+18)+" "+Z$(Z(Z)) 
899 IF ZL=2 THEN 959 

996 IF Z(Z-2)<>@ THEN ZZ$=Z$(Z(Z-2))+" HUNDRED "+ZZ$ 
919 IF ZL=3 THEN 959 

920 IF Z(Z-4)=@ THEN ZZ$=Z$(Z(Z-3))+" THOUSAND "+ZZ$ 
930 IF Z(Z-4)=1 THEN ZZ$=Z$(Z(Z-3)+10)+" THOUSAND "+ZZ$ 
949 IF Z(Z-4)>1 THEN ZZ$=Z$(Z(Z-4)+18)+Z$(Z(Z-3))+" THOUSAND "+ZZ$ 
950 ZZ$="** "477$4+" "+ZY$ 

969 IF LEN(ZZ$)<15 THEN ZZ$="** ZERO "+RIGHT$(ZZ$,8) 
978 RETURN 

989 ' 

999 ' Main program starts here 

1999 C=3: R=5 

1919 FOR I=l1 TO 14: READ MI$(I): NEXT 

1920 PAYEE$="" 


1939 ' 
1049 ' Print menu on screen module 
1958 CLS 


1969 X$=STRINGS$(89,131) 

1970 PRINT @(9,8) STRINGS (3@,131);" WOODCHIP Software ";STRING$(3@,131); 
1989 PRINT @(3,8) ,STRINGS (89,176) 

1998 PRINT @(19,0) ,x$ 

1199 PRINT @(22,0),X$; 

1119 FOR Y=4 TO 18: PRINT @(Y,39),CHR$(149);: NEXT 

1120 FOR Y=@ TO 21: PRINT @(Y,@),CHRS$(191);: PRINT @(Y,79),CHR$(191);: NEXT 
1139 PRINT @(1,30),"Basic Code Programs"; 

1149 PRINT @(2,33),"CHECK WRITER"; 

1159 PRINT @(20,8),"USE ARROWS TO MOVE POINTER TO DESIRED PAYEE THEN PRESS <ENTER>"; 
1169 FOR I=1 TO 7: PRINT @(2*I+3,8) ,MIS(I);: NEXT 
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117@ FOR I=8 TO 14: PRINT @(2*I-11,47) ,MI$(I)3: NEXT 

1189 PRINT @(R,C),HPS; 

1199 ' 

1209 ' Move pointer module 

1219 I$=INKEY$: IF I$="" THEN 1219 

1220 IF I$<>CHR$(8) AND I$<>CHR$(9) AND I$<>CHR$(1@) AND I$<>CHR$(11) AND I$<>CHR$(13) 
THEN GOTO 1219 

1230 IF I$=CHR$(9) AND C=42 THEN PRINT @(R,C),HES;: C=C-39: PRINT @(R,C),HP$;: GOTO 1219 
1249 IF I$=CHR$(9) AND C=3 THEN PRINT @(R,C),HE$;: C=C+39: PRINT @(R,C),HP$;: GOTO 1219 
1259 IF I$=CHR$(8) AND C=3 THEN PRINT @(R,C),HES;: C=C+39: PRINT @(R,C),HP$;: GOTO 1219 
1269 IF I$=CHR$(8) AND C=42 THEN PRINT @(R,C),HES;: C=C-39: PRINT @(R,C),HP$;:GOTO 1219 
1279 IF I$=CHR$(19) AND R=17 AND C=3 THEN PRINT @(R,C),HES$3: R=R-12: C=C+39: PRINT 
@(R,C),HP$;: GOTO 1219 

1289 IF I$=CHRS(1@) AND R=17 AND C=42 THEN PRINT @(R,C),HES;: R=R-12: C=C-39: PRINT 
@(R,C),HP$;: GOTO 1219 

1299 IF I$=CHRS$(1@) THEN PRINT @(R,C),HES;: R=R+2: PRINT @(R,C),HP$;: GOTO 1219 
1309 IF I$=CHR$(11) AND R=5 AND C=3 THEN PRINT @(R,C),HE$;: R=R+12: C=C+39: PRINT 
@(R,C),HP$;: GOTO 1219 

1318 IF I$=CHR$(11) AND R=5 AND C=42 THEN PRINT @(R,C),HES;: R=R+12: C=C-39: PRINT 
@(R,C),HP$;: GOTO 1219 

1329 IF I$=CHR$(11) THEN PRINT @(R,C),HES;: R=R-2: PRINT @(R,C),HP$;: GOTO 1219 
1339 IF C=3 AND R=<17 THEN PAYEES=MI$(INT(R/2)-1) 

1349 IF C=42 AND R=<17 THEN PAYEES=MI$(INT(R/2)+6) 

1359 IF PAYEE$S="EXIT TO DOS" THEN CLS: SYSTEM 

1369 IF PAYEE$S="TYPE YOUR OWN" THEN PAYEES$="" 

1379 ' 

1389 ' Print check on screen and input amount and memo module 

1399 PRINT @(20,8),LES$; 

1499 PRINT @(R,C),HES; 

1419 FOR Y=4 TO 18: PRINT @(Y,8),LE$;: NEXT 

142M PRINT @(5,5),STRINGS(70,131);: PRINT @(17,5),STRINGS(79,131); 

1439 FOR Y=5 TO 16 

1449 PRINT @(Y,5),CHR$(191);: PRINT @(Y,74) ,CHR$(191); 

1459 NEXT 

146M ' OBVIOUSLY: Replace string$ in 1469, 1479 & 1489 as desired 

1479 PRINT @(6,11),"MR. I. M. YOUR CHECKWRITER"; 

1489 PRINT @(7,16),"LOST RAM ADDRESS"; 

1499 PRINT @(8,16), "SOMEWHERE, U.S.A."3 

1592 PRINT @(8,69) ,DATES; 

1519 PRINT @(10,8),"Pay to the"; 

1520 PRINT @(11,8),"Order of :";STRING$(49,95);"  $";STRING$(12,95); 

1539 PRINT @(11,19) ,PAYEES; 

1540 PRINT @(13,8),STRINGS(64, 95); 

155@ PRINT @(15,8),"Memo: ";STRING$(22,95);" "STRINGS (29,95); 

1560 IF PAYEE$<>"" THEN GOTO 16390 

157@ PRINT @(20,8),LES; 

1589 PRINT @(20,8),"TYPE PAYEE'S NAME THEN <ENTER> -->"; 

1599 ML=32: PO0=1644 

1699 GOSUB 379 

1619 ™ A$="" THEN 1579 

1620 .... EES=A$ 

1630 PRINT @(11,19) ,PAYEES; 

1649 PRINT @(2@,8),LES; 

1659 PRINT @(2@,8),"TYPE IN CHECK AMOUNT THEN <ENTER> -->"5 

1660 ML=7: P0=1648 
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1679 GOSUB 379 

1689 IF A$="" THEN 1649 

1699 ZA=VAL(A$) 

1700 IF ZZ$<>"" THEN GOSUB 659: GOTO 1729 
1719 GOSUB 559 

1720 PRINT @(11,60),ZA$; 


1738 PRINT @(13,8),ZZ$;" 


"s STRINGS (55-LEN(ZZ$) ,"*");" Dollars"; 


1749 PRINT @(20,10) ,LES; 


1759 PRINT @(29,8),"TYPE 


1769 ML=22: 


IN MEMO IF DESIRED THEN <ENTER> -->"5 
P0=1651 


1778 GOSUB 389 

1789 MEMOS=A$ 

1799 PRINT @(15,16) ,MEMOS; 

1899 PRINT @(20,10),LES; 

1819 PRINT @(28,10),"<F1> TO PRINT, <F2> TO REDO/WRITE ANOTHER, <F3> TO EXIT TO DOS"; 


1828 PRINT @(21,@),CHRS(191);: 


PRINT @(21,79) ,CHR$(191); 


1838 I$=INKEY$: IF I$="" AND I$<>CHR$(129) AND I$<>CHR$(139) AND I$<>CHR$(131) THEN 1839 
1849 IF I$=CHR$(129) THEN 1859 ELSE IF I$=CHR$(13@) THEN 1020 ELSE IF I$=CHR$(131) THEN 


SYSTEM 


1858 PRINT @(20,10),LES; 

1869 PRINT @(20,10),"GET PRINTER READY THEN PRESS <ENTER>"; 

187@ I$=INKEY$: IF I$="" THEN 187@ ELSE IF I$<>CHR$(13) THEN 1809 
1889 ' 

1899 ' DMP 209 Printer module (Replace as required to match printer) 


1999 LPRINT 
1919 LPRINT 
1928 LPRINT 
1939 LPRINT 


1949 LPRINT: 


1959 LPRINT 
1969 LPRINT 
1978 LPRINT 


1989 LPRINT: 


1999 LPRINT 
2000 LPRINT 


CHR$(27);CHR$(31); 

CHR$(20)3: LPRINT CHRS$(27);CHR$(56); 
CHR$(19) ; 

TAB( 42) LEFT$(DATE$,5) 3 TAB(53)RIGHT$(DATES, 2) 
LPRINT 

TAB(11)PAYEE$; TAB(48)ZA$ 


TAB(4)ZZ$5" ";STRING$(55-LEN(ZZ$) ,"*") 
LPRINT: LPRINT: LPRINT CHR$(27) 3CHR$(28); 
TAB(8)MEMOS 

CHR$(19); 


2919 GOTO 1959 


(Editors Note) Again if there is a space between the last character in a line and the 
next line of a wrap-around line then we have shown it by indenting the second line one 


Space, 


This will not show on a printout of the program after you have typed it in, but 


will help to clarify where spaces are located in this printed text. -Ed. 
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Advertisement 


Computing is Fun! 


All they need is software... 


Back in 1985 a few of us got to- 
gether and decided to make a 
useful publication which would 
help others get the most of their 
computers. It wouldn’t have ad- 
vertising. It would have plenty of 
good information on how to pro- 
gram. It would have programs 
that could be used in very practi- 
cal ways. The programs would be 
explained in considerable detail - 
not only how they worked, but 
why they were written the way 
they were. 


We called the publication Code- 
Works. The first issue came out 
in September 1985 and has been 
published every other month 
since. Each issue contained at 
least three major programs. Some 
turned out to be so-so. Others 
were good, and some turned into 
real winners. 


In addition to the programs 
there were ongoing series on learn- 
ing to program in BASIC. A little 
at a time - one concept, fully 
explained. The readers found 
something to challenge them in 
each issue. They alsocontributed 
with their own ideas and pro- 
grams. 


Our aim from the beginning 
was to make programs that would 
run easily on Tandy Models III 
and 4, as well as CP/M and MS- 
DOS. We did it. We came up with 
a universal PRINT@/LOCATE 
subroutine that worked. We added 


change lines tothe programs that 
needed them. 


There were programs for busi- 
ness. We had modeling programs. 
There were games, and even a 
couple of unique artificial intelli- 
gence programs. Then we cre- 
ated a whole new batch of utility 
programs. 


Each year we collected all the 
programs and put them on adisk- 
ette and made it available to the 
readers. It was a success. There 
were an average of about 30 pro- 
grams each year - for a total of 
over 150 for the past five years. 


We are not trying to sell youa 
subscription to this magazine. We 
are now heading more towards 
the MS-DOS world and Quick- 
BASIC. The subscription price was 


Send to: 

CodeWorks 

3838 South Warner Street 
Tacoma, WA 98409 


$24.95, and the annual diskettes 
were priced at $20.00 each. 


As a special to readers of 
Computer News 80, we are of- 
fering complete sets of back is- 
sues (by year, 6 issues per year) 
for only $18.00. And if you act 
now, we will include the disk- 
ette for that year at no extra 
cost! Be sure and tell us, though, 
if you want the Model III, 4 or 
MS-DOS version of the diskette. 
Issues available are for years 1, 
2,3 and 4. We won’t recommend 
the current year’s issues because 
they already lean towards MS- 
DOS. 


Want tocheck it out first? Send 
us your name and address and 
we'll ship you a sample issue - 
with no obligation on your part. 


We have a limited number of all 
back issues, so order yours 
toady! 

We reserve the right to supply 
photo copies of certain issues 
which are in short supply. 


Please send year # (1,2,3 or 4) issues 
PLUS diskette for MODEL 
_______ Send sample copy only. 


Name 
Address 


City/St/Zip 


Send check/MO or VISA/MC # for $18.00 postpaid. 


VISA/MC 





Books by Christopher Fara Wy ts 


MICRODEX 


MOD-4 BY CHRIS for TRS/LS-DOS 6.3, 232 pages 
MOD-III BY CHRIS for LDOS 5.3, 234 pages os — eames 
MOD-IIl BY CHRIS for TRSDOS 1.3, 210 pages ke penne Se 


- 


$24.95 each, $39.95 any two, $59.95 any three 


Complete Owner's Manuals for Models 4/4P/4D and Model Ill, 
fully updated for all current DOS versions. These beautifully 
designed books replace obsolete and confusing Tandy and 
LDOS manuals and addenda. Mod-III editions combine both the 
"Basic Operations" and "Disk System" manuals in one book. 
Mod-4 edition has chapters on DOS SuperVisor Calls previously 
not accessible without a separate “technical” manual. No more 
fumbling between pages: each subject is contained under a 
logical, bold heading on one page or on pages facing each other 
when the book is open, with plenty of blank space for notes. 





Written in plain English, the manuals are better organized, with 
more and better examples for use of DOS, JCL and BASIC; 
include chapters with examples on interfacing of DOS and BASIC 
with assembly language; describe in detail popular ROM, RAM 
and DOS subroutines; and provide lots of useful extra information 
never before published in the Model Ill and Model 4 manuals. 





" ,.. NO matter how long one is using a system, there will be times to look up the manual ... nothing easier than looking 
into Chris' comprehensive, beautifully arranged and printed treatise ... the organization is exceptional good ... * 
[ Review by Henry H. Herrdegen ] 


"... excellent alternative ... not only does it offer information | have not been able to find in the regular and BASIC 
manuals, it explains in better detail what some of the more arcane commands are good for, or not good for ... here is a 
manual where you can find it all ... " [ Review by Henry A. Blumenthal ] 


JCL BY CHRIS 30 pages, $7.95 


Job Control Language for Mod-Ill LDOS and Mod-4 TRS/LS-DOS 
doesn't have to be so confusing as the ‘official’ manuals made it. 
Our remarkable, well-organized booklet includes step-by-step 
explanation how to design, build, DO and compile JCL files, plus 
a description of other JCL features, and a reference section with 
examples. We've got rid of the jargon and JCL turns out to be 
simple, easy, useful and fun. 





",.. the investment for this instruction booklet was small compared to the welcome education on the expanded use of 
my computer ... thanks to Chris and his way of explaining things in a simple and logical fashion ..." [ Ray Stanley ] 


Z-80 TUTOR I 40 pages, $9.95 


Introduction to assembly language programming for beginners, 
based on Chris’ popular essays in Computer News 80 (1989 
volume) and revised in a book form. Covers memory and machine 
code concepts, typical steps in assembling, and application of 
basic Z-80 instructions and subroutines in Mod-lll and Mod-4. 
Plain talk will quickly ease you into useful programming, and , 
practical examples will give immediate satisfaction. | $4.00 for one in US, 


$6.00 for two in Us, 
$8.00 for three in US. 


Published and Distributed by ; $6.50 for one to Canada 
COMPUTER NEWS 80 PO Box 680 Casper, WY 82602 $9.00 for two to Canada 


$12.00 for three in Canada 
Overseas write for S&H Charges 





The 
BIBLE 


on Disks 

NEW and OLD TESTAMENT 
TRS-80 Formats 
KING JAMES VERSION 


Includes Printed Mstructions 
and Suggestions for Disk Use. 





COMPUTER NEWS 80 
Is Published monthly by 
CONSTRUCTION NEWS PUBLISHING CO, 
1220 Jamaica*Drive, Casper, WY 82609 







Publisher and Editor 
Stan Slater 
Associate Publisher Editor 
Ron Gatlin 








All mail received at 
P.O. Box 680, Casper, WY 82602 






Technical Questions, Software Orders and 
Letters to the OPEN FORUM should be sent 
to P.O. Box 680. 






All files are in ASCII and each chapter of each book is in a separate file, for easy recall 
or transfer to your word processor, then use global search, List each chapter to your 
screen or your printer, Combine the files into one file per book, Many, many more uses, 






Sorry we can not handle technical questions 
over the phone. 





New Testament (on 9 Disks if Formatted Single Sided TRS/LS-DOS 6.3) for $ 22.50 
Old Testament (on 24 Disks if Formatted Single Sided TRS/LS-DOS 6.3) for $ 47.50 
Both Old and New Testament $64.50 (Save $5.50) Add $ 4,00S &H 


Please indicate format of your choice, 
TRS/LS-DOS 6.3 Model 4 Single Sided Double Sided 


TRSDOS 1.3 Model III Single Sided Only 
LDOS 5.3 Model III Single Sided Double Sided 


MS-DOS for PC's and Compatibles, Double Sided 5-1/4 Disks only 


Classified Ad Rates $3.00 per Ship to: 
column inch, per monthly issue. A NAME 
column inch is 35 character spaces 
wide and 6 vertical lines long, ADDRESS : 
($3.00 Minimum; Each six lines CITY STATE ZIP 
$3.00, OK) 
Payment Enclosed ___——s—C‘CChteC« or: Mtoe Order, Purchase Orders Accepted, 


Send your ad with payment to 
Computer News 80, PO Box 680, 
Casper, WY 82602, sorry no ads can 
be taken by phone at this time. Ads 
with box numbers for forwarded 
reply mail, add $5.00. 


Sorry, no credit card orders, for COD add $ 2.75 for COD charges, All orders shipped 
by UPS when possible, please give your street address when ordering. 


Computer News SO 


P.O. Box 680 
CASPER. WYOMING 82602-0680 


CLEARANEE y 


COMPUTER NEWS 80 has acquired a very limited supply of 


Send Orders to 


es ee es ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee 
hes es see ee en ee ee ee ee es es 








64K 150ns Memory Chips 
128 cycle refresh. 
Our kit of 8 of these chips to expand your Model 4/4P/4D to 128 K 
Shipped with Memory Check Program Disk and Instructions. 


$12.95 
plus $4.00 Shipping and Handling 


PAL CHIP - needed with the expansion kit for Non-Gate Array 
Computers $8.00 each shipping charge included. 








The HyperMem memory expansion kit is a dramatic price break-through in memory expansion for the 
TRS-80 Model 4/4D/4P that has just been introduced by Anitek Software Products. Now you can expand 
a 128K Model 4/4D/4P to 384K for only $99.95. This incredible cost savings is made possible by the 
Very-Large-Scale-Integrated chip (VLSI) used in the kit. Further savings are passed on to to you by 
the fact that you assemble the kit yourself. Why pay someone else money to assemble the kit for you 
when you can do it yourself and save $$$$$ ? 


HyperMem uses the same bank-switching technique that Tandy designed into your 128K Model 4/4D/4P, 
but expands your memory beyond where Tandy left off, giving you access to as much as 1 Megabyte of 
internal memory. A must for the serious computer user, and now at an unbelievably low price. 


HyperMem takes up almost no space inside your computer and does not interfere physically or 
electronically with other circuitry. HyperMem is guaranteed to be compatible with any graphics 
boards, speed-up kits, or any other upgrade that you might already have in your computer that isn't 
using the RAM chip sockets. 


HyperMem memory expansion kits can be purchased in any of the following configurations: 





Each HyperMem kit comes with easy-to-follow step-by-step instructions and a thorough memory test 
diagnostic disk to ensure a perfect installation. All of the above kit configurations come with 
enough RAM chips to expand a 128K Model 4/4D/4P to the corresponding sizes listed above. Any 
HyperMem configuration can be further expanded to 1 Megabyte using your own 41256 RAM chips, 
available everywhere. 


HyperMem can be used to increase the text buffer size of LeScript 2.01. With 384K of HyperMem, you 
have enough memory for the DOS, the LeScript program, the entire 70,000-word spelling checker 
dictionary, and about 150K of text buffer. 


With the HyperDrive RAM disk emulator driver, HyperMem can also be used as one or more super-fast 
RAM “disk drives". These RAM “disk drives" look like regular disk drives to the DOS but are 50 
times faster than a floppy drive and 10 times faster than a hard drive. This can drastically cut 
the processing time of all your disk-intensive programs and save you several hours of work every 
week. HyperDrive is only $19.95, plus $3 s/h; works with LS-DOS, TRSDOS 6, and LDOS. 


FIRST EXTRA BONUS --- Order your HyperMem kit before April 30, 1990, and mention that you read about 
it in this ad in Computer News 80, and we'll through in the HyperDrive RAM-disk emulator software 
absolutely FREE! It is our way of saying thank you for giving HyperMem a try. 





SECOND EXTRA BONUS --- Place an order for 2 or more HyperMem kits before April 30, 1990, and mention 
that you read about it in this ad in Computer News 80, and we'll knock 10% off the total of your 
entire order. Even if you order other items at the same time, we'll still apply the 10% discount to 
everything on that order. 


Prices guaranteed through April 30, 1990. Please add $4 per kit for shipping and handling ($10.00 
if overseas). Please specify the 26-10xx model number of your computer when ordering. VISA and 
MasterCard. accepted. To order your HyperMem memory expansion kit or receive more information call: 


407-259-9397, Anitek Software Products, PO Box 361136, Melbourne, FL 32936 


Our new LS-DOS 6.3.1 release has a 


Application Pack 
half-off until pokes 


St 


The DATE command, “Date?” prompt on boot, and the 
@DATE SVC now support a date range of 32 years; 
from January 1, 1980 through December 31, 2011. 


Enable or disable the printer time-out and error 
generation with SYSTEM (PRTIME=ON |! OFF) 


Customize the display of the time field in the DIR com- 
mand to display 12-hr or 24-hr clock time with SYS- 
TEM (AMPM=ON| OFF). 


Both ASCII and hexadecimal display output from the 
LIST command is paged a screen at a time. Or run it 
non-stop under your control. 


MEMORY displays (or prints) the status of switchable 
memory banks known to the DOS, as well as a map of 
modules resident in I/O driver system memory and 
high memory. 


Specify SYSTEM (DRIVE=d1,SWAP=d2) to switch drive 
dl for d2. Either may be the system drive, and a Job 
Control Language file may be active on either of the 
swapped drives. 


The TED text editor now has commands to print the 
entire text buffer, or the contents of the first block 
encountered. 





Have extended memory? The SPOOL command now 
ts the BANK parameter entry to range from 0-30 
instead of 0-7. 


Alter the logical record length of a file with “RESET 
filespec (LRL=n)” 


Specify “RESET filespec (DATE=OFF)° to restore a 
file’s directory entry to the old-style dating of pre-6.3 
release. Specify “RESET filespec (DATE=ON)” to es- 
tablish a file’s directory date as that of the current 
system date and time. 


Felt uncomfortable with the alleged protection scheme 
of 6.3? LS-DOS 6.3.1 has no anti-piracy protec- 
tion! MISOSYS trusts its customers to honor our 


copyrights. 


Best ofall, an LS-DOS 6.3.1 diskette is available as 
a replacement disk for $15 (plus $2 S&H in US). 
There's no need to return your current master. 


The 6.3.1 diskette comes with a 30-day warranty; 
written customer support is available for 30 days 
from the purchase date. Versions for the Model 4 and 
Model II /12 are available. If you do not already have 
an LS-DOS 6.3.0, order the 6.3.1 Upgrade Kit with 


90 days of customer support for $39.95 (+$2 S&H). 


MISOSYS SPECIALS an THE MONTH 


PRO-WAM Mister ED Mister ED is loaded with editor applica- 
tions. All are full screen which make your 
editing jobs casy. Best of all, these are PRO- | greater at $10 off - Only $24.95 + $4 S&H! 
WAM applications so they can pop up even 
when you are using other Model 4 programs. 


SUPER UTILITY PLUS - The ee floppy 
disk utility ever written for the TR , Now even 


SU+ is completely menu-driven and is configurable for all 
the popular TRS-80 operating systems. SU+ removes or de- 


Mister ED includes: DED to edit disk sec- | codes passwords, reformats a disk without erasing the data, 
tors; FED, to edit file records; MED, to edit | fixes problems, backs up most protected disks, etc. SU+ has 
memory (even banked); VED, to edit the | over 65 functions and features. Too many to describe! Does not 
video screen; and TED, similar to TED/| work on hard disks. SU+ does not support Newdos/80 double- 


CMD to edit text files. 


sided disks. 


Only $19.98 + $3 S&H until April 30th| Specify Model I/II or 4. $24.95 + $4 S&H until april 30th 





MISOSYS Hardware and Software 


XLRA8er'™ 


Memory expansion & Speedup 


PRO-WAM™ Version 2 
Window & Application Manager 





e Faster: Hitachi 64180; up to 8 MHz Z80 equivalent 

e Expanded RAM - 256KB additional memory 

e Software - LS-DOS 6.x, LDOS 5.x, or CP/M 

e Simple plug-in installation «New lower price! 

XLRS8er 256K Ram [R-MB-004] $182+$5S&H 

Specify Computer Model & Number (26-) and if Hires graph- 
ics board installed. 


Floppy Drives and Accessories 





§.25" 360K 1/2-height $75+$4 S&H 
3.5" 720K in 5.25" frame $85+$3 S&H 
3.5" 1.44M in 5.25" frame (PC-AT) $99+$3 S&H 
Our Model 2SV5 dual half-height vertical external floppy disk 


drive enclosure will hold two 5.25" half-height disk drives or 
one standard height drive. 


2SVS5 drive case/PS $60+$5 S&H 
8" Dual floppy extender cable $15 
four-foot connecting cable $10 


Note: S&H prices are UPS ground to continental U.S. 


| Hard Drive Pre-assembled Kits 


Our kits come assembled in a cabinet holding up to two 
half-height drives, 60 watt p/s, fan, SCSI controller, 
and host adaptor. Software includes: driver, format- 
ter, archive, restore, and sub-partitioning - all for one 
DOS: LS-DOS or LDOS. Give us a call to discuss 
building one for you! Individual parts available. 


20 Megabyte kit: M3 or M4 $495+S&H 
40 Megabyte kit: M3 or M4 $645+S&H 
Hardware clock option $30 


Joystick option with joystick $20 
Host interface cable $20 
Additional software interface $30 





Miscellaneous parts 


Ribbon cables: We custom manufacture and test using Cirris 
Systems cable tester: DB25, Printer 36, edgecard 34 & 50, 
header, 34, etc. Call/write for pricing with your specifications. 


DRAM: 64K-150ns ($2/chip); 256K-150ns ($4/chip); U72 
PAL ($8); PAL/PLD/PROM programming (call/write) 


Kel-Am connectors: 34-pin male ($8); 34-pin female ($5) 
(pair needed for 4P external floppy mod: see 12/87 SOMICRO] 


Deouwihike Duty 


DoubleDuty, published previously by Radio Shack (cat 26- 
2231), is now available from MISOSYS. DoubleDuty divides 
your 128K TRES-80 Model 4 computer’s memory into three 
complete and independent partitions. Two partitions each 
operate as if they were ther own 64K Model 4. The third can be 
used to execute DOS library commands. If you thought you 
needed another computer, think again. With DoubleDuty, you 
can now have two for the price of one! Just $49.95 (+$2S&H)! 





Our applications turn your 128K Model 4 into a sophisticated business 
or personal machine rivaling the best of them. Because easily installed 
PRO-WAM comes with many useful and powerful menu-driven time 
savers and work organizers. PRO-WAM is accessed with a single key- 
stroke; its export and import functions allow you to move data across 
windows between programs. 

e Address CARDS, LABELS, and HEAD display & export 

e BRINGUP tickler file; new PRINTING and sorting 

e CALENDAR flags BRINGUP items visually on screen 

e Ten3x5 CARD files with FORMS and FIELDS 

e Virtual PHRASE access for export 

e New TODO list manager with “who does it” 

e Plus many other vital applications! 


PRO-WAM [M-51-025] $74.95 + $SS&H 


LB Data Manager 





A flexible data manager 


LB is easily used by anyone for managing their data. It's menu driven 
for ease of use; absolutely no programming needed. Requires a Model 
4 with 128K or ahard drive. LB86, an MS-DOS version is also available. 
Now activate PRO-WAM from newly compiled LB beta release (hard- 
ware restrictions apply) 
Store up to 65534 records per data base 
Up to 1024 characters (64 fields) per record 
Nine field types for flexibility 
Select and sort on up to 8 fields (multiple indexes) 
10 input/update screens per data base 
10 printout formats per data base 

e Extensive on-line help available 
LB (L-50-510] 


$74.95 + $SS&H 
TRS-80 Model I/Ill/4 Language Software 
MRAS ($59.95+$4S&H): An advanced Z80 assembly package for 


the programmer who wants a powerful and flexible development sys- 
tem. Includes a macro assembler which generates either relocatable 
object code modules or CMD files directly, a linker, a cross reference 
tool for directly generated CMD files MLIB, our REL module librarian, 
and our SAID advanced full screen text editor . 


EDAS ($44.95+$4S&H): Powerful disk-based line editor and Z80 
macro assembler assembles from nested source files or memory buffer; 
nested conditionals with ten pseudo-ops, nested MACROs with parame- 
ters both positional and by keyword, cross reference listings; and a 


separate full screen text editor. 

MC ($79.95+$5S&H): a complete C compiler which adheres to the 
standards established by Kernighan and Ritchie. The package is 
supplied with the compiler, pre-processor, an optimizer, assembler 
macro files, C libraries, a Job Control Language file, the header files, and 
a 400+ page user manual. MC requires the use of either M-80 or MRAS 
(available separately), 2 disk drives, and upper/lower case. 


EnhComp ($59.95+$4S&H): handles most of Microsoft BASIC; 
floating point single and double precision functions; random file 
access (“X" mode reclens to 32767), turtle graphics, pixel graphics, 
keyed array sort, multi-lined functions, user commands, REPEAT- 
UNTIL, line labels, and more. Built-in Z80 assembler to easily create 
hybrid programs of BASIC and in-line assembly code . 


DSMBLR ($24.95+$2S&H): Direct disassembly from CMD disk 
files, automatic partitioning of output disk files, data screening and full 
label generation. \t even generates the ORGs and END statement . 


HartFORTH ($49.95+$3S&H): a full 79-STANDARD FORTH; is 
designed to run under an operating system . The virtual Memory that 
it accesses for storage and retrieval purposes is a normal DOS file 
supports double length integers, string handling, cursor manipulation, 
graphics, random numbers, and floating point. 


YOUR CHOICE OF 798 
DISKS FULL OF TRS-80 


ty... you alarmed over the high cost of PROGRAMS. ALL LISTED 
zi i o a. | long distance rates while downloading 


h. Public Domain Software? 


van i, THOUSANDS 


IN FOUR SEPARATE 

CATALOGS ON DISKS. 

SF MODEL 1/3 CATALOG 

= Listing 186 disks of Utility, Business, Education, Game, 
and Communication Programs for Model I or III. 
MODEL 4 CATALOG 
Listing 158 disks of Utility, Business, Educational, 
Game, and Communication Programs for the Model 4/4P/4D. 
HI RESOLUTION / MACPaint 
Listing 373 Disks of HiResolution and MacPaint Files. 
ORCHESTRA-—-9O CATALOG 
Listing 81 Disks of TRS-80 Orchestra 90 Music. 


CATALOG DISKS $2.00 EACH - Nonrefundable-Postage Included 
FREE Bonus of One Program Disk of Your Choice with your 
first order from any catalog. A $4.00 value. 


News 80 ee 


P.O. Box 680 
CASPER, WYOMING 82602-0680 


Download Through The ho 


[) ~ A DISK EDITOR/ASSEMBLER 


for MODELS I/III/4 BY DAVID GOBEN 





DEA Disk Editor/Assembler, extends your computing power and brings 
you ASSEMBLY LANGUAGE editing and assembling with speed and 
efficient use of memory. DEA is a software program that includes a 
complete memory-resident line editor and 280 assembler. 


DEA Disk Editor/Assembler features much more than simple support of the EDTASM command set, it 
provides extensions and enhancements which allow you to move, copy, edit or extend whole blocks of 
lines. You can assemble, run and debug an assembly program right from within memory. You can 
assemble files larger than the edit buffer, include other source files in an assembly with the 
INCLUDE stack that is 8 levels deep. (5 on TRSDOS 1.3), reference other source. programs without 
assembling them, great for overlay programs, have labels up to 15 characters long which can 
contain special characters such as "@", "$", "2?" and "_", even as the first character in the 
label, perform conditional assemblies up to 15 levels deep, and support of most of the big system 
features, such as segment operators, radix control, block comments, encrypted messages, greatly 
extended DEFW and DEFB operators, Full lower-case support even with symbols, opcodes and editor 
commands, plus pages of other great features. The manual is 100 pages plus of easy to read 
instructions, printed on 8-1/2 by 11 pages, in a three ring binder for easy use. -D.G. 


ORDER FROM ---------- COMPUTER NEWS 80 P.O Box 680 Casper, WY 82602 
$ 49.85 Plus $4.00 (US FUNDS) -- CANADA AND Overseas Apdbd $6.00 S&H 
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PERIPHERALS SALE! 


Model 3/4 Hard Disk Drives 


© Lowest Prices Ever ® Complete with Cables ® High Performance 
® Brand New Units ® Complete with Software ® Reliable 
@ FCC Class B Certified @ Money Back Guarantee ® Thousands in Use 


As Low As $ : 8 Qs 80ms 


20MB, 65ms.. only $449 40MB, 40ms (28ms optional). . $559 


Faster drives available at extra cost. 


Add $22 packing and shipping in a custom made foam carton. 
Software and cables included. Brushed stainless steel case available. Add $20. 


Aerocomp leads the way with lower prices for our loyal TRS-80 friends once again. 
Aerocomp drives are a TRS-80 standard and are available in three sizes. These are not 
uncertified kits, but new and complete units ready to run. All models include brand new 
Seagate drives, not some used drive or one that has been refurbished or from a second 


rate manufacturer's boneyard (Tandon, Miniscribe, etc.). 


These external hard drives are FCC Class B Certified as required by law. Aerocomp 
hard drives are an established product and have survived the test of time. Thousands of 
satisfied Aerocomp hard drive customers have proven these products a solid value for 
their owners. A secondary hard drive can be added at any time you desire. Larger drives 
can be installed in your original case, thereby protecting your investment. The hard drive 


Sauvaver EREELEASY: 


Save Now On Our 


LOW COST 
FLOPPYS 


Aerocomp has been supplying quality disk drives at low prices since 1980. 
All drives are half-height and are new—not factory blems, seconds, close- 
outs or a defunct manufacturer's surplus (MPI, Qume, Tandon, etc.). We 
offer just about every combination of internal and external floppy config- 
uration plus the proper cables to connect everything together. We 
appreciate your business and will do our very best to support you. If, for 
any reason, you aren't happy with your hardware selection, we'll cheerfully 
refund the entire purchase price, less shipping. Order yours today! All 
items (except software) have a one year parts and labor warranty. 


BARE DRIVES 1-TEAC 55F 720K, dual enclosure $ 
360K 5.25" TEAC 55B bare drive 40tk Add $10 for brushed stainless steel cover. 
720K 5.25" TEAC 55F bare drive 80tk ...... CABLES - CASES - DOS 
1.2M $.25" TEAC 55G bare drive 80tk ....... IBM ext floppy cable (drives C/D) 
360K 3.50” TEAC 35B bare drive 40tk TRS-80 2-drive floppy cable 
720K 3.50” TEAC 35F bare drive 80tk TRS-80 4-drive floppy cable 
1.4M 3.50” TEAC 35H bare drive 80tk .. 6" floppy ext cable, gold contacts 


DRIVE-POWER SUPPLY COMBINATIONS 3%" case, power supply w/o ext 
(Includes gold plated extender) 5%" case, power supply w/o ext 
1-TEAC 35B 360K, dual enclosure 9 TRS-80 Mode! 4 CP/M (Monte ver.) ......... 69 
1-TEAC 35F 720K, dual enclosure Add $10 for brushed stainiess steel cover. 
1-TEAC 55B 360K, dual enclosure Add $4 shipping for singles, $6 for duals. 


DOUBLE DENSITY 
CONTROLLER 


$ Add $4 


80% more disk capacity is what you get when you add our DDC to your 
TRS-80 Model 1. This controller has withstood the test of time. All the 
others are gone, yet the Aerocomp DDC endures. Why? Because it has 
proven itself as the only way to achieve reliable floppy disk operation on 
the Model 1. Requires the Radio Shack Expansion Interface and software 
driver. All DOS (except TRSDOS) have the necessary double density 
driver. If, for any reason, you don't like the DDC, we'll refund the entire 
purchase price, less shipping. Order yours today! One year parts and labor 
warranty. 


AETOICOINP scare 


2544 West Commerce St. Dallas, Texas 75212 SINCE 1980” 


































itself can even be transferred to an MS-DOS compatible computer if that is in your future. 


Our units are complete with a 6’ interface cable and the TRSDOS, LDOS or CP/M 
software driver of your choice at no additional cost. 


Aerocomp provides all the little things that are so important for a long, trouble-free life: 
continuous-duty switching power supplies; filtered forced-air ventilation; effective EMI 
filtration; solid steel construction; five front panel indicator lights (Power-Ready-Read- 
Write - Select): built-in diagnostics; and gold plated connectors. 


Probably the most importantthing of all is our 30 day money back guarantee. If, for any 
reason, you are not satisfied with the drive, we'll refund the entire purchase price, less the 
shipping charges. The warranty is for one full year and includes all parts and labor. 


ADD DISK DRIVES TO 
YOUR MODEL 3/4! 


Complete System 


New ; 
Low Price! Less Drives, DOS 


Now 9 


Convert your cassette Model 3 or 4 to fast disk operation with one of our 
easy-to-install kits. Complete instructions are provided. All you need is a 
screwdriver and a pair of pliers. Our own advanced controller, 100% 
compatible with the original, plated steel mounting towers with RF! shield 
and all cables and hardware included. Select your drives from the other 
column and call us, toll-free, to place your order. I, for any reason, you 
don't like the kit, we'll refund the entire purchase price, less shipping. 
Order yours today! 


Disk Controller RS-232 Board 
only *49 complete *49 


Add $5 shipping. One year parts and labor warranty. 


OUT THEY GO! 


ENJOY INCREDIBLE SAVINGS NOW ON SOFTWARE, 
BOOKS AND MANUALS...WHILE THEY LAST! 


CP/M* SOFTWARE BASIC Faster & Better Demo Disk 

Twist & Shout BASIC I/O Demonstration Disk 
CP/M BOOKS & MANUALS TRSDOS 6.2 Utilities with Manual 

inside CP/M, by Cortesi (book) Electric Pencil Word Processor 
CP/M System Prog. Manual, Model 4 TRS-80 BOOKS 
Monte’s Mail (newsltr), Vol. 1 #1, Vol. 2 #1 Games & Graphics for the TRS-80 
Specify Volume Each Volume 1 Inside Level I! 

TRS-80 SOFTWARE 
BASIC Faster & Better Library Disk 











ORDER TOLL FREE! 


M-F 9-7; Sat. 10-3 MARKETING As 


1-800-527-0347... Mms 





SERVICE: 214-638-8886 INFORMATION: 
TELEX: 882761 214-637-5400 Have your American Express, MasterCard or Visa ready. We will not ship. Your satisfaction is guaranteed on hardware products. !f youare 
. charge your card until the day we ship your order. Mail orders are not satisfied, for any reason, call us within 30 days of receipt and we 
FAX: 214-634-8303 welcome. Money orders are accepted as well as your company and will cheerfully refund your money (less shipping). All original ma- 
. a -8 personal checks as long as they are bank printed and have your terials must be intact and undamaged, as well as the original container 
; address and telephone number. We will ship surface COD with no This offer does not apply to software. Defective software will be 
ft >» ING deposit on most items, but all COD's require cash or a Cashier's Check replaced. No other software warranty applies. Prices and specifica- 
MarterCard p RAL AIALS rh. on delivery. Texas residents add State Sales Tax. No tax collected on tions are subject to change without notice. Any returns must have our 
L 4 merant adh TeleCheck out of state shipments. Thereis a one year warranty (unless otherwise authorized RMA number on the label to be accepted. 
~ stated) on all hardware items against defects in materials or workman- ©1990 by Aerocomp. All rights reserved. 











CP/M 


Now only $140. Pickles & Trout CP/M-2.2m for your Radio 
Shack TRS-80 Model-II, -12, -16, or -6000 computer. 


Still running “less-than-the-best?” We can upgrade your 
existing CP/M software (Lifeboat, P&T, ATON, What- 
ever) to the latest Pickles & Trout CP/M-2.2mH release, 


only $65. [Includes new manuals, full screen editor, full 


utilities, double sided disk support, and more.] 


RAMD — Let your P&T CP/M use the 68000, memory as 


a super-speed disk drive, only $49. 


REFORMATTER — Your TRSDOS system can read/ 


write CP/M diskettes, only $49. 


Looking for a CP/M program? WordStar, dBASE? 


Give us a call. 


TriSoft 


1825 East 38 1/2 
Austin, TX 78722 
1-800-531-5170 
1-512-472-0744 





LOWEST PRICES EVER! 


MS/D 
Electric Webster Speller 55% off $ 39.99 
w/Correcting Feature $ 79.99 


“The Cadillac” of Spelling Checkers - 80 Micro, 3/82 
El. Web. Hyphenation 35% off incl. 


E.W. Grammar & Style 35%off $ 49.99 


“A fantastic ... Grammar Checker” - 80 Micro, 4/85 


The Works! (All E.W. features) $ 119.99 

LeScript 1.7 50% off (reg 199.99) $ 99.99 

Allwrite W/P (w/o support) 67% off  N.A. 

Whoops Instant Speller/Thesaurus $ 39.99 
“delivers its full potential superbly” - 80 Micro 6/87 

Combo (Word Proc. & Spell) 55% off $129.99 

Whole Works! (AlLEW Feat. & W/P) $ 199.99 


TRS- 
$ 39.99 
$ 99.99 


$ 32.49 
$ 32.49 


$149.99 

$ 64.99 

$ 64.99 
N.A. 


$ 99.99 
$199.99 


Order Now: 415-528-7000 


Visa, MasterCard, checks O.K. Add $3 for C.O.D. Add $5 for shipping & 


handling. Add sales tax in Calif. Specify W/P when ordering. 


Cornucopia Software, Inc. 
1625 Beverly Place, Berkeley, CA 94707 





Professional results with TRS-80 


Fully supported products for 
Models Ill and 4 4p 4D 


PC/XT/AT, Tandy, and 100% compatibles (MSDOS) 
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xT.CAD PROFESSIONAL by Microdex. Computer Aided 
Drafting software for technical production and education. 
‘Create, edit, modify precise drawings, details. Features 
include overlays, grids, Cursor snap, zoom, pan, block copy, 
enlarge, reduce, rotate, mirror, clip, merge, text labels, more. 
Requires hi-res screen and RS-232 interface. Output to pen 
plotters. Input from keyboard, or optional digitizer. 

Friendly, competent support since 1984. Software is backup- 
free. Was $345 in 1986 catalog. 

Model 4 4p 4d or MSDOS $95 _$146.0e 


xT.CAD BILL of Materials by Microdex. Software utilizes text 
labels from xT.CAD drawings to automatically generate 
invoices, parts requests, shipping lists, etc. Includes a mini- 
editor for customizing line printer output. 

Model 4 4p 4d or MSDOS $ 45.00 











CASH PROFESSIONAL by Microdex. Bookkeeping software 
with automatic double-entry ledger distribution in user- 
definable accounts. Reports by period, account, project, etc. 
Ideal for small business, professional or personal accounts. 
Model 4 4p 4d or MSDOS $45.00 








S/XT software by Microdex. Enables disk directory review and 
special character printing from within standard Scripsit. 
Model Ill or 4 4p 4d $15.00 


MICRODEX <> 


PUBLISHED AND DISTRIBUTED BY 


Computer News SO 


P.O. Box 680 
CASPER. WYOMING 82602-0680 





xT.CAD PROFESSIONAL software by Microdex (Models 4/4P/4D and MSDOS) 


xT.CAD is a software package for general purpose, two dimensional, precisely scaled technical Computer 
Aided Drafting. It runs on simple, inexpensive, generally available hardware. It saves time and money for 
anyone who produces technical drawings, plans, diagrams, schematics, details, flow charts, shop drawings 
he it in their work, study or hobby. The savings accumulate fast as you create, modify and save on disk your 
drawings, templates, commonly used parts or symbols. Then copy them to your next drawing, same size, 
reduced, enlarged, rotated or mirrored. Often it is possible to produce a complete new drawing within 
minutes by simply editing and merging your previous work. Two overlays are always resident in memory for 
quick manipulation, but you can have as many overlays as you wish on the disk. You can zoom in and out 
between the entire 24"x36" sheet and 1/100-th of an inch detail. You can also pan (shift) the view across the 
drawing in any direction. xT.CAD is easy tolearn and use. Most of the functions are executed instantly upon 
pressing a single mnemonic key (for example the slash key creates a line between two points). Of course 
you can also create desired shapes by entering numerical data. xT.CAD has been used since 1984 by several 
hundred professionals. It has been called “draftsman’s delight” in a review in 80-micro, a “serious tool for 
the professional” in Computer Shopper, and “certainly worth the cost” in PCM-magazine. It is a fully 
productive tool for manufacturers, architects, engineers, contractors, but it is also an excellent training 
resource for educators and students. 


INPUT: xT.CAD is designed for easy cursor control from the keyboard, but you may also use a mouse. 
MSDOS packages support selected mice such as Microsoft, Logitech or Tandy..However, depending on 
hardware and operating system the mice may not always work with MSDOS versions of xT.CAD. 
TRS/LSDOS packages support Micro-Labs mouse interface for Models I11/4/4p/4D. 


All packages support the following optional digitizers: 
Houston Instrument True Grid series 1000 and 8000, Kurta Series One, and Tandy GT-2000. 


OUTPUT: xT.CAD is specifically optimized for precision scale drafting and text labeling on pen plotters. All 
packages include user-selectable drivers for the following plotters: 

Hewlett-Packard HP-7470A, 7475A, Colorpro, Draftpro, etc, and 100% compatible 

Houston Instrument DMP-29 or higher and PC-595, 695, and 100% compatible 

IBM plotters models 6180, 6184, 7371, 7372, etc. 

Roland DXY-101, 800, and Hewlett-Packard compatible Roland models 

Tandy PC-695 multipen plotter Cat. 26-2830, Tandy 6-pen plotter Cat. 26-1191 
Also, any serial plotter 100% compatible with current Hewlett-Packard HP/GL language, or current Houston 
Instrument DM/PL language, should also work with all current versions of xT.CAD. 
Screen-print utility for selected dot-matrix printers is included in all TRS/LSDOS packages. On MSDOS 
computers use the MSDOS “GRAPHICS” function if printer is compatible. However, screen print does not 
support text labels. Scale, proportion and line quality are more or less acceptable. 


TRS/LSDOS package: Models 4/4p/4D require 64K memory, 2 disk drives, floppy or hard, RS-232 interface 
and a high-resolution graphics board, Tandy or Grafyx Solution from Micro-Labs. Runs in’ fast machine 
language under TRSDOS 6.2 or LSDOS 6.3. 


MSDOS package: PC/XT/AT or compatibles such as Tandy 1000/1200/3000 require 256K memory, 2 disk 
drives, floppy or hard, RS-232 board and IBM-CGA compatible 640 x 200 ‘color’ graphics adapter. 
Monochrome monitor recommended, color monitor OK but xT.CAD uses only background/foreground. 
Runs under MSDOS 2.11 or higher. Now also available on optional 3%” disks! 


ALSO AVAILABLE 


TCAD 


Drawing sizes up to 24” x 36” 

Full size overlays 

Direct and auto zoom and pan 
Decimal and ‘customary’ scaling 
Full inch and fractional grids 
Cursor snap to grid or intra-grid 
Variable cursor speed control 
Single key functions from keyboard 
Single operating mode at all times 
On-line help and memory alert 
Accuracy up to 1/100 of an inch 
Digital (coordinate) input functions 
Block copy and erase any time 
Block reduce / enlarge 1% - 9999% 
Mirror / rotate 1 - 360 degrees ‘ 
Merge, rotate, rescale drawings 
Save / load drawings to / from disk 
Cut out and save parts of drawings 
Text labels full ASCII set 

Two text sizes, two directions 

Text duplication saves memory 
Left justified ‘typewriter’ option 
Hardcopy reduce / enlarge 1% - 9999% 
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xT.CAD DEMO disk: self-tutoring 15-minute auto-demo shows and explains main functions of xT.CAD. 
User may switch any time to a ‘live’ version of the program which allows hands-on experimenting with 
xT.CAD (except output). Requires same computer system configuration as the full xT.CAD program. 


xT.CAD BILL of Materials software by Microdex (Models 4/4p/4D and MSDOS) 

Generates alphabetized listings of items by matching text labels embedded in drawing files created by 
xT.CAD with descriptions and optional unit prices in user’s master files. Several drawings and master files 
can be scanned automatically in one pass and reports such as parts lists or invoices with optional cost and 
totals calculations can be printed on line printer. Mini-editor allows easy customizing of report formats. 
Runs in fast machine language under TRSDOS 6.2, LSDOS 6.3, MSDOS 2.11 or higher. 


CASH Professional software by Microdex (Models 4/4p/4D and MSDOS) 

Small business, professional or personal book-keeping based on cash method and calendar year 
accounting period. Transactions are recorded and edited as single line entries on a word-processor-like 
screen. CASH automatically distributes debits and credits and creates a self-balancing ‘double-entry’ 
ledger. Any number of ‘jobs’ or ‘profit centers’ each with up to 144 journal lines per month, 48 main accounts 
and any number of sub-accounts can be maintained. Reports can be printed in any combination and range 
of periods, accounts, sub-accounts and projects. Utility is provided for customizing of output for various 
line printers. Runs in fast machine language under TRSDOS 6.2, LSDOS 6.3, MSDOS 2.11 or higher. 
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S/XT software by Microdex (Models ill and 4/4p/4D) 


Modifies original Scripsit to display disk directory and print special characters or codes such as underline or 
superscript. For Scripsit 3.2 (TRSDOS 1.3) and Scripsit 1.0 (TRSDOS 6.2 or LSDOS 6.3). 





xT.CAD w/manual was $345.00 $ 95.00 
xT.CAD Demo $15.00 Manual $10.00 _____ combo $ 20.00 
xT.CAD BILL of Materials software $ 45.00 
CASH Professional! software $ 45.00 
S/XT Scripsit enhancement software $ 15.00 


Shipping and Handling add__—4$4.50 


Conan “tT published and Distributed by 
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TRS-80 Software from Hypersoft. 





NEW ! PC-Three TRS-80 Model III Emulator ! 
PC-Three is a new program from Hypersoft that lets you run LDOS 
5.1-5.3, TRSDOS 1.3, NEWDOS 80 V2, DOS-Plus 3.5 & MultiDOS on a 
PC, XT, AT or similar machine. PC-Three emulates a TRS-80 Model 
III with its Z80 Microprocessor and 64K of memory. It supports the 
printer and serial ports and most of the functions of the floppy disk 
controller. To use it you must be the legal owner of a TRS-80 Model 
III DOS and either a copy of the MODELA/III file (on TRSDOS 6.2) or 
a working TRS-80 Model III or 4. 


Runs on PC, XT, AT & compatibles and laptops with at least 384K of 
memory. ONLY emulates TRS-80 Model III. Comes with a special 
version of PCXZ totransfer your disks to MSDOS. Depending on the 
type of drives on your PC you may need access to a working TRS80. 
Price: (Includes I free Upgrade) Order #PC3 ...ccccccccccocscecsccsvocceee$ 109.95 
Call our support number after 6 P.M. for special price for PC4/PCXZ owners. 


Run Model 4 Software on a PC with PC-Four ! 
Now you canrun your favorite TRS-80 Model 4programs ona PC}. 
PC-Four is a program that makes your PC or Compatible behave like a 
128K TRS-80 Model 4 complete with operating system, Z80 
microprocessor that can run many true Model 4 programs such as 
ALDS, ALLWRITE, BASCOM, BASIC, C, COBOL, EDAS, 
ELECTRIC WEBSTER, FED, FORTRAN, HARTForth, Litile Brother, 
MULTI-BASIC, MZAL, PFS FILE, PASCAL, Payroll, PowerMail, 
PROFILE, SUPERSCRIPSIT, TASMON, VISICALC, ZEUS and more. 


Runs on PCs, PS/2s, compatibles and laptops with at least 384K of 
memory. ONLY emulates Model 4 mode of Model 4. To use it you must 
transfer your old files to MSDOS disks using PCXZ or Hypercross. 
Prices: Order #PC4 $79.95 alone, #PC4H $104.95 with Hypercross 
SX3PCM4, #PC4Z $119.95 with PCXZ. Available on 3.5" disk format. 


PCXZ reads TRS80 disks on a PC, XT or AT 

PC Cross-Zap (PCXZ) is a utility that lets you copy files to or from 
TRS-80 disks ona PCor AT. Transfers alltypes of files. Converts 
BASIC automatically, no need to save in ASCII first. You can also 
format a disk, copy disks, explore, read and write sector data, repair 
bad directories and muchmore. Supports: all double density Model I, 
III and 4 formats. Requires: PC, XT, AT or compatible. You must have 
at least one 5-1/4" regular or high density drive and 256K memory. Not 
for PS/2e% Order HP OK.Z. isccsciescecssssvistissndedventvsctiswiasiveseisdisesiveseos $79.95 
Exclusive ! - Only PCXZ lets you repair and modify TRS-80 disks ona PC. 


Read CP/M CoCo & PC disks on your TRS80 
Use HYPERCROSS to COPY files between TRS-80 disks and those 
from many CP/M and IBM-PC type computers on your TRS-80 I, III 
or 4/4P. FORMAT alien disks, read their directories, copy files to and 
from them, copy directly from one alien disk to another. Converts TRS80 
BASIC to MSDOS or CP/M as it copies, no need to save in ASCII first. 
Formats supported: IBM-PC and MS-DOS including DOS 1.1, 2.0-3.2 
Tandy 2000, single and double sided, 3.5 and 5 inch. CP/M from 
Aardvark to Zorba. CoCo format on X T+ version. 

HyperCross 3.0 PC reads popular MSDOS 1.1-3.2 formats Order 
SX3PCM1, SX3PCM3 or SX3PCMG ...........ccscccssceccerscceescocesssceessccees $49.95 


HyperCross XT/3.0-Plus. Reads over 220 formats inc CoCo Order 
SX3XTMI1+4+, SX3XTM3+ or SX3XTMA4¢+ .......cccccccsssssscessssssssesseees $129.95 
Specify TRS-80 Model I (needs doubler), III, 4/4P or MAX-80. Dual 
model versions e.g. Mod 3/4 on one disk add $10 extra. 


Other TRS-80 Programs 
HYPER ZAP 3.2G Our ever popular TRS80 utility for analyzing, copying, 
repairing and creating floppy disks of all kinds ...............cscccsssseseeeoees $49.95 
MULTIDOS 2.1 New for 1988 for | or 3 $79, 64/80 for Mod 4(3) ....$89 
Mysterious Adventures - Set of 10 for M1, 3 or 4(3) complete ....... $49.95 
TASMON debug trace disassemble TASM! TASM3 or TASM4 $49.95 
TMDD Memory Disk Drive for NewDOS 80/ Model 4 users ....... $39.95 
XAS68K 68000 Cross Assembler, specify Mod 1, 3 or 4...........000 $49.95 
ZEUS Z80 editor/Assembler for Model 1 3 or 4...........cssssesceeesereees $74.00 
ZIPLOAD fast load ROM image, DOS & RAMDISK on your 4P $29.95 


We have more! Write or call for complete catalog. 
Hypersoft 
PO Box 51155, Raleigh, NC 27609 
Orders: 919 847-4779 8am-6pm, Support 919 846-1637 6pm-11lpm EST 
MasterCard, VISA, COD, Checks, POs. $3 for Shipping, $5 2nd day 


"DACK" 
for 
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MS-DOS 


BASIC Program Packer, Unpacker and Compression Utility 





Written and Copyright (c) 1987-1989 by David Goben 


PROGRAM REQUIREMENTS: 
TRS-80 MODEL I OR III OR 4/4P/4D 
AT LEAST 16K OF MEMORY (32 RECOMMENDED) 
ONE DISK DRIVE (INSTALLATION MAY REQUIRE TWO) 


$ 17.95 


Plus $ 4.00 (S&H) 


COMPUTER NEWS 80 
PO Box 680 


Casper, WY 82602 


Distributed by 


MS-DOS: AT LEAST ONE DISK DRIVE. 
MEMORY REQUIRES AT LEAST 128K 








BYTE BACK 


AT TAXES 
WITH TRY-O-TAX 


e available for CoCo, MSDOS, TRS-80 

* revised for '89 law changes 
orompts for easy guided use 

¢ calculates schedules A-F, SE 

* computer generated substitute forms 

¢ FREE TAX ESTIMATE PROGRAM 


SHORT FORM ALONE $15.00 


















NO CREDIT 
CARDS, C.O.D. 






PERSONAL 
CHECKS WELCOME 


$44 99 SHIPPING 


TRY-O-BYTE, 1008 Alton Circle, Florence, S.C. 29501, (803) 662-9500 


onpeR 1-800-476-4265 omy 





TRS-80" SOFTWARE 


TYPITALL Word Processor $69.95 
with Spelling Checker $99.95 
Word processor upwardly compatible with 
SCRIPSIT — it reads your old SCRIPSIT 
files and uses the same-formatting and cur- 
sor movement commands. 
Send any control/graphic character to the 
printer. Print formatted text on the screen, 
or send it to a disk file for later printing. 
Merge data from a file during printing. Assign 
any sequence of keystrokes to a single con- 
trol key. Call up to 16 help screens at any 
time. Move cursor forward or backward by 
character, word, line, paragraph, or page. 
Optional spelling checker has 29,500 word 
dictionary — verify a 3,500 word document 
in less than two minutes! 


SYSTEM DIAGNOSTIC $69.95 

Complete tests for every component of 

your TRS-80" Model 1, 3, or 4 (separate 
versions for each model). 

ROM: checksum test. RAM: three tests. 
Video display: character, video RAM, signal. 
Keyboard: every key contact tested. Line 
printer: character tests. Disk drives: disk con- 
troller, drive select. track seek, read sectors. 
formatting. read/write/verify data with/with- 
out erasing, disk drive timer, disk head clean- 
er. Single/double density, 1-99 tracks. RS-232- 
C interface: connector fault, data transmis- 
sion, framing, data loop, baud rate generator. 

SMART TERMINAL $39.95 

The intelligent telecommunications pro- 
gram for TRS-80 Model 1, 3, 4 or Model 2/12 
CP/M. Memory buffer for sending and 
receiving files. Automatic transmission and 
reception of data. Character translations, 
true BREAK key, help screens. 


TRS-80 Model III 
ASSEMBLY LANGUAGE $29.95 


A complete course in assembly language, 
written for the beginner. Includes Monitor 
#5, a complete machine language debugger. 


‘HOWE SOFTWARE 


Information and same day orders: 
(914) 273-3998 
64 WINDMILL ROAD 


ARMONK, NY 10504 
30-day Money Back Guarantee! 


Please allow 2-3 weeks for delivery. 
*TRS-80 is a trademark of Tandy Corp. 


CHICAGO 
SYSLINK 
NE 


____ Simple — Powerful Professional | 


Serving your telecommunications needs: 


@ Multi-user with Online Chat 

@ Info-Mat Weekly Magazine 

@ Bruce Tonkin Monthly Column 
@ CACHE Information 

@ M & M Online Store 


TANDY MS-DOS and 
TRS-80" SOFTWARE 


SMALL BUSINESS ACCOUNTING 
with PAYROLL $99.95 
Based on the Dome Bookkeeping Record 
#612, this program handles bookkeeping 
and payroll for a small business. Bookkeeper 
provides single entry ledgers for income and 
expenses, computes monthly and yearly sum- 
maries. Payroll handles up to 99 employees 
with automatic deduction of F.L.CA. and 
federal income tax. State tax and three op- 
tional deductions also included. Prints pay- 
roll and expense checks, Form 941 reports 
and W-2 forms. 


MAILING LIST $99.95 
Create and maintain mailing lists of up to 
32,767 names and addresses. Up to five-line 
entries including title, first and last riames, 
optional second line, address, city, state, zip 
code, optional fifth line and telephone num- 
ber. Sort or search for names by any field. 
Print labels in 1, 2, 3, or 4 adjustable columns 
or on envelopes. Print form letters with any 
substitutions. 
HOME BUDGET and 
CHECKBOOK ANALYST $59.95 
A complete checkbook program combined 
with budget comparisons, income and ex 
analysis, and projections. Computes current 
checking balance. Also handles non-check 
expenses, bank debits, and income. Monthly 
and year-to-date summaries, yearly projec- 
tions based on data up to a known month. 
SMALL BUSINESS . 
MANAGEMENT SYSTEM $299.95 
A complete point-of-sale program for a 
small business. 
Order desk handles order entry, invoicing. 
Includes 1,999 8-character part numbers 
Bookkeeper maintains general ledger. 
Inventory produces sales reports. 
Installation sets program to your business. 


24-Hour TOLL-FREE Order Number: | 


Outside California call: 


(800) 428-7825, ext. 169 


Inside California call: 


(800) 428-7824, ext. 169 


Terms: checks, Visa, Master Card, or C.O.D. 
Shipping and handling: $3.00 
Canada, Mexico, Hawaii, Alaska: $6.00 
New York residents please add sales tux. 


TIRED OF 
LYING TO 
YOUR 
COMPUTER 


Or going without a date! 


UPGRADE YOUR PRESENT 
TRS 6.2 SYSTEM DISK 
TO ACCEPT DATES TILL 
DECEMBER 31, 1999 
WITH David Goben's 


T6é2D0S2T 


100% Compatibility with 
both old dating standard 
and the new LS-DOS 6.3 and 
LDOS 5.3 dating standard. 
Read both types of disks 
with Complete Safety. 


Includes several optional 
system patches and Utility 
programs to take much of 
the work out of disk for- 
matting and backup. Many 
added features beyond just 
being able to enter a date 
beyond Dec. 31, 1987 


Distributed by: 
COMPUTER NEWS 80 


$18.00 


Plus $2.00 S&H 


FULLY SUPPORTED BY THE 


: Get the latest issue of TRSLINK 
TRSLINK Is the new disk-based magazine dedicated 


ORK 


to providing continuing information for the TRS-80. 
A new issue is published monthly, featuring 
Public Domain programs, "Shareware", articles, 
hints & tips, nationwide ads, letters, and more. 


TRSLINK can be‘obtained from your local 
TRS-80 BBS, or download it directly from: 


@ Online Games with Prizes 

@ Numerous Message Topics 

@ National/Local BBS Lists 

@ Remote Location Networking 
@ Micromatch/Find a Friend 

@ Software — Downloads/Uploads/Exchange 


Call anytime at (312) 622-4442 


8/n/1 #4 


(215) 848-5728 
(Philadelphia, PA.) 
Sysop: Luis Garcia-Barrio 


300/1200/2400 Baud, 8/N/1, MNP 3-5 


TRSLINK MONTHLY ISSUES ON A DISK 
ARE ALSO AVAILABLE FROM THE FILE 
CABINET COLLECTION $ 1.50 PER 

ISSUE. ORDER FROM COMPUTER NEWS 80 
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| January 2, 1990 
Save BIG on | | pEADLINE FOR ARTICLES 
used Tandy DMP 105 Printers ep AND ADVERTISING 1990 
3 : DEADLINE 2 : 
: EDITION : FOR ADS AND: : MAILED 
Low, Low Price $74 Q5 : February 1990 : 23 
9 : Vol 3 Ho 2 : Jan 15 : : Jan 29 
a i. ae : March 1990 =: 2 
Original catalog price $199.95 f=" : Vol 3Ho3 =: Feb 12 ft Feb 26: 
Tape igs 
- Bit Image Graphics me pre te a i, 
- Prints 80 CPS < ; VoL3NOS o: Aprils ot: Apego 
e Includes Owner's Manual Ror ae a aE eae RN| 
- Does not include Tractor Feed; {| ee 
Tractors may be purchased at cost fe... : Wol'sBo7? o: gunit 9 :: guns 
: August 1990 ; : : 
: Vol 3 No 8 : Jul 16 :3 Jul 30 
We accept VISA & MasterCard or C.0.D. The above prices do not reflect | ee ci: ae 
shipping cost. Inventory changes dally; please call for availability. If you don't : : a : 
see what you need, please call and we will do our best to locate it for you. oa : October 1990 : , 23 
‘ :, Vol 3No10 : Sep 10 23 Sep 24 
Pacific Computer Exchange The One Source for Used Tandy Equipment! : a aH : 23 
3 OM $ ° 8 
(503) 236-2949 then : Wol3HOM =: Ockis +: Oct 29 


PACIFIC COMPUTER EXCHANGE Deceaber 1950 
1031 S.E. Mill, Suite B - Portland, Oregon 97214  . 


e @ oe, e 
Pee ee re ee 


CLASSIFIED AND DISPLAY ADS RECEIVED AFTER THE DEADLINE 

WILL BE PLACED IN THE FOLLOWING MONTHS ISSUE. 

Articles and News Releases will be placed in any of the future 
issues following the current issue. 





KEEP THIS CHART HANDY 
THANK YOU FOR YOUR SUPPORT 


Z2Z—-80 MACHINE 
LANGUAGE: 
TECHN ITIOUVUES 


= B = 
SWITCHES a ee 


. by DONALD W. ADY 
Connect any two printers 
to one a The definitive book on machine 
language programing. Presenting 
recap er al all the required fundamentals 
O.ORe: Detter of machine language programming 
and with machine language in 
323-75 the context of BASIC program- 
ming. 236 8-1/2 x 11 pages, 
Plus $4.00 S&H illustrated by numerous 


examples and fully supported by 
Now in Stock at | the author. 


Computer News 80 lim 
See our Product en s 22.95 


Order Form. CSS 
Plus $ 4.00 S & H 


Published and Distributed by 
COMPUTER NEWS 80 
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Computers 
MOG S 2 DIIVG siiiiniccie eeeiineaiies $255 
RAO 4 2 DVIVG oesciccscccsecsechnticasiedsviaeesccsenicceteseiaws $345 
Mod 4 2 Drive 128K .........ccscccsccssssssensssssssseeseees $365 
MOGBP 2 DAV iiscscssvsdssscecsintecccctaeciaviccsnisiavenene $345 
MO 100 2A K oiiscasisccecsciccitesscendhaccictaveveecsuviebie $235 


Printers & Hard Drives 


T@ndy 5 MOG A. Divsscsissscccictiscs si cscdvcccssdectacsevesevs $275 
Tandy 12 Meg H.D............sssssssssssereccesssnsscrseeees $345 
Tandy 15 Meg H.D.....ccscsccssscsccsssssssssssscesscesseees $425 
All hard disks include cable & software 
ON 1S weseendcassiaadevsssacieurceccinsainatanianccestcerieetss $105 
DOI 20 iscciesadsauticvsweusavedssvccanacinctasiapuntebssuevewenee $145 
MD 4 Multi Plexer & Hard Drive ........sss.ss:.0+-. $245 


RADIO SHACK TANDY OWNERS 
Find The Computer Equipment That Tandy No Longer Sells 






CGP 220 Ink Jet.........ccccccccccsssecccccsseccnsssccccceens $215 
8) | cole + enn et ra A RE ee ee $175 
DONAP 200 sone iss ieccav icccxeschevesanssastateamstateecessicwess $155 
PAP A 0 isieccicsisecsevadiahiveddatesnessuctiuetscennateinwase $325 
BAP BO cssccccscsscevsacevssscuaeaxaccaucvsiecsageanvesseesssns $365 
DMP 2100 24 Pint .......cccccccsssccccsssccccsssenccnscevenss $395 
DO Us iscccdsceetecncestueudevuettevesacdededcvecivisansasaacnces $325 
DWP 1 iste icectsii eee waists $245 
DWP 210......sssc000 $215 DWP 510.............. $395 
LANG PPAR Ss cicigecnciecceeeliaceiccceantivinswisncvakewssses $195 
LANG PrittOl © icsscwsssssuecseetecucctccszesinecceveesuccccucuv $135 
410 Tractor (N@W)........ssscccccssssssseecrcccersssesessesoes $75 
TEACTOR TOE 21 C0 aces orccsssacisacGeespiciiccisiceiiseceacins $115 
WY TE PEAGTOR oo scecsssesssctasexcrtatsscacsscscacessicvistussseis $115 
DW Il Sheet Feeder (N@W)............sssssssssssssesees $245 
CGP 115 Color Graphic ...........cscssssescscecsssnsesees $95 


Software and Miscellaneous 


MD 3 Scriptsit Dictionary...............ccccccscscseeesees $22 
MD 3 Superscripsil .............cssssscssssssssssssreseesees $55 
MD 3 Time Manager ...........ssssscscssscssssscssssssessees $14 
MD 3 Videotex PIUS............cccccccsccsscrsssesseceseseees $25 
MD 3 Checkwriter 80............cccccccccccrssssssscseessees $18 
ADD 3 CODON ic ic ccscesciivicdassacstivsessctisicecntesconnavaiees $45 
MD 3 Disk Stock Market Trend...............ssssss0 $24 
DS OTE ves cicocsccssccstcacinassccsucededcasinneanieavcecs $45 
DDS: PASCO piece Seciciuwzsesisscccdenncendesusevaadevarecds $45 
UB RS od C0) | | eee ee $15 
MD 3 Profile PIUS.........cccsssssscsscsscsssserccsssssssnsees $29 
MD 3 SCriIpSit DISK....cccescsessnccscssessosssessseisseecassss $29 
MD 3 HOME ACCOUNANL.........ccccccccccsssssrsscesessees $39 
MDS DOS PIS cise eeeiiiiiiveine $24 
MD 3 Advanced Statistical Analysis............... $19 
NDS LONOU sivciscnisvtscctnasectaisarasaneisenaawanteredstinieee $12 
MD 3 T80 Flight Simulator.............ssccsessseenes $25 
MD 3 Maxi Manager Database...................0000 $20 
MD 4 Assembly Language Development....... $45 
MD 4 Superscripsit Dictionary ............sssceee $25 
MD 4 TRS DOS Training Course...........ccssess $26 
ID 4 PES FNC ive svi secistecscvesenssuscevcunasescaincveeseeit $45 


MD 4 P.F.S. Target Planner Callc..........csssssssees $35 
MD 4 Electric Webster Proofing System........ $28 
MD 4 Double Duty ...........csscssssssssssssssssseccccnscsees $34 
Mi AS: SCM sesso ecsiiescesccaaiiadeestiieencseeies $34 
WDD Fh AUIWUTNG ccsccdeicei sce censaceccncceissaveceresucceseecevees $45 
MD 4 ACCOUNTS Payable ..........cscsssscessceccesecesees $55 
MD 4 Accounts Receivable ...........ssssssssssssserns $55 
MD 4 W-2 Writer ..........ccccccscccssssssssscssensescesnccsens $29 
MD 4 DeSK Matte ..........cceccscccssscssssssssesencescccecceens $69 
MD 4 Business Statistics Analysis................. $34 
MD 4 Real Estate Loans Analysis...............00 $34 
MDS TK SOW Ol oiscisciacecsssssavssnsesvencessverescousessens $45 
MD 4 TRS 80 Computer Graphice..............s08 $35 
MD 4 Video Tex PIUG...........cssecesccsssecssesscncccenecs $39 
MD 4 Super scripSilt ...........::cccessssssssenensessesnsenane $55 
Mod 4 TRS DOS & Manual............cssessssccecsccsees $24 
Mod 4/4P Technical Reference ..........csccccssssse $29 
Printer Cables Mod 3-4..........cscssssscsssesssssssessens $15 
Mod 3/4 Disk Drives Internal ............ccscccssscseees $55 
MOCO INSP viciccsscavecsscctseedievessvecineessasiedvansenseusaanaek $35 
Printer Selector SWItch..............ssssssssesssesscnecsers $45 
RS 232 Selector SWItCH ...........:ssssssesssseseeessennes $39 


¢ All equipment is guaranteed to be in good working order. *« Equipment is cleaned and tested. 
¢ Drives are cleaned and timed as needed. 
We accept VISA & MasterCard or C.O.D. The above prices do not reflect shipping cost. Inventory changes daily; 
please call for availability. If you don't see what you need, please call and we will do our best to locate it for you. 


Pacific Computer Exchange The One Source For Used Tandy Equipment! 
(503) 236-2949 


PACIFIC COMPUTER EXCHANGE 


1031 S.E. Mill, Suite B - Portland, Oregon 97214 





"I was astonished at the power T/Maker put 
into my Model 4P computer. It was compact 
and vesatile, a sort of digital Swiss Army 
knife, and I kept finding more ways I could 
use it.” - Howard Graves 


T/Maker 


Tandy 2000 or IBM Compatible disks 
T/Maker Integrated Software includes: 


WORD PROCESSOR SPELLING CHECKER 
DATABASE SPREADSHEET 
BAR CHARTS UTILITITES 


APPLICATIONS LANGUAGE 


Add $4.00 for ground shipment or $7.00 for 2nd day air 
shipment. California residents add 7&1/4% sales tax. 


T/MAKER RESEARCH COMPANY 


SPECIAL COUPON 
PURCHASE A GRAFYX SOLUTION 


HI-RES GRAPHICS BOARD PACKAGE 
for $99.95 and receive a free 


copy Of DRAW with this coupon. 
Offer good only to subscribers of 
COMPUTER NEWS 80 and expires 

May 15, 1990 Micro-Lass, INc. 


Draw 





The Grafyx Solution™ for your Creativity 





Superior Graphics. DRAW is a 
powerful graphics editing package which 
allows drawings or designs to be easily 
created on a Mod 4/4D/4P/Ill 


The DRAW program contains almost 
10,000 assembly language instructions for 
maximum speed and flexibility. By moving 
the cursor with the arrow keys and entering 
one letter commands, one can set, clear or 
complement points, lines, circles, ellipses, 
ares, or boxes. 


Practical Graphics. DRAW is 
obviously a must for generating computer 





art and engineering drawings, but is also 
a necessity for anyone, no matter what his 
application. Businessmen and scientists can 
use DRAW to add text labels or other 
refinements to previously generated 
graphs. Once the picture is centered, 
labeled and refined, it can be saved on disk 
or printed on any of 30 popular printers. 
All of this is done with single letter 
commands without ever exiting DRAW. 


812 Pollard Road (Suite 8), Los Gatos, CA 95030 a ee. | 
(408) 866-0127 {ts free... coupon 


ORDER FROM Mucro-Lass, Inc. 





HVIV INTERNAL DISK DRIVE KITS 
Complete with controller, drive stands, power 
supply, cables. Add Drives & Dos. 

2 FH Drives $149.95..4 HH Drives $159.95 
FDC controller onll........:...0:scssecese00- 89.95 
Internal 20 pin flat ribbon cable......$ 4.95 
Int. disk drive cable non G/A 

Int. disk drive cable G/A 


HARD DISK DRIVES BS 

We sell complete hard drive units. They may cost a little 

more. However, we only use quality components such as Your SOURCE for Models I, II, IV's 
Wester Digital controllers (not some out of production a 
parts), our own high speed host adapter, 60 watt power TIMECLOCK Modelt's 

st:pply, room for a second hard drive or HH floppy, and e Automatic DATE and TIME when 

quiet, time proven quality drives. Tandon (made by W.D.) booting. 

Ninisoribe and others, Seagate avail upon ae Hare e Connects to and extends 50 pin buss. 
ng eee = ian gaia: oo alasraiican a CD leehictenmsrctacon mors(a cele 

dais mas paar St ences ae pita : ° Addressable from basic 

ae ea is ~ 8 Free standing or attaches to Computer. 


MULTIDOS $10.00 Xtra) 

10 Meg...$ 425.00 15 Meg...$ 495.00 introductory price S$ 39.95 
2) Meg...$ 545.00 30 Meg & up $Call 
B: re hard drive bubbles avail. CALL BBS 


Storage Power HD host adapter...$ 59.95 


Complete w/case, power supply, Cables. 
2 40 track HH DS DD $ 229.95 
2 80 track HH DS DD 
2 3.5" 80 track 


MISCELLANEOUS 
Power Supplys 65w Aztec 
60w replacement for R/S 38w 
CRT Tube green/amber......ssessssssee $79.95 1 80 track FH DS DD......... 
Mod I Double Density Board ; BARE DRIVES 
Printer cables 6ft $14.95/ 12ft $19.95 40 track DS DD FH refurb 360k..$ 64.95 
34 pin edgecard cable connector....$ 1.25 Replacement for SS Mod III & IV 
Connectors, cable or custom cables $ CAll 40 track DS DD HH..360k 
80 track DS DD HH..720k 
80 track DS DD FH..720k. 
3.5" 80 track..720k 


HARD DISK DRIVERS: 
We've been using & selling Powersoft drivers (the Best) 
for our drives and carry them for other brands including R/S. 
Partition your HD by head or cylinder. 


eMod IV TRSDOS 6.x, LS-DOS 6.x 
Includes HD boot for 4p..............+. $ 19.95 
eBoth for 

MULTIDOS Hard Disk drivers 


We can supply most of the parts (new & used) that you will 
need in repairing & upgrading Mod I, III or IV's. Call or 
write for availability & price. 


Call our BBS for SPECIALS and other products. 
(714) 952-8666 8-N-1 
STORAGE POWER 
10391 Oakhaven Dr. 

Stanton, Ca. 90680 
(714) 952-2700 
9:00 am - 8:00 pm PST 
All C.0.D orders are cash only. Prices are plus shipping and subject 
to change and availability. Calif orders require 6.25% sales tax. 


AY (0) BB AYA. 155.7) (0) Oo vy os BS 
Caution some people do not specify new versus pulls. 
8 4164-200ns new $ 14.95/Pulls $ 9.95 
8 4164-150ns new $ 19.95/Pulls $ 14.95 
Pal chip for non Gate/array $ 10.95 
MOD IV SPEED UP KITS 
Non Gate array (5.1Mhz) 
Gate array (6.3Mhz) 


70 5.25" Disk storage w/lock 
40 3.5" Disk storage w/lock 
80 3.5" Disk storage w/lock 








WHAT'S WRONG WITH THIS AD? 





Grafyx Solution” sove $170.00 


Hi-Resolution Graphics 





Superior Hardware. The Grafyx 
Solution provides 153,600 pixel elements 
which are arranged in a 640 x 240 or on 
the Model Il a 512 x 192 matrix. Hundreds 
of new business, personal, engineering, and 
educational applications are now possible. 
The hi-res display can be shown on top of 
the standard display containing text, special 
characters, and block graphics. This 
simplifies program debugging, text labeling, 
and upgrading current programs to use 
graphics. The Grafyx Solution fits complete- 
ly within any tape or disk based Model 4, 
4D, 4P, or Ill. Installation is easy with the 
plug-in, clip-on Grafyx Solution board. 


for Mod 4/4D/4P /ill 


Superior Basic. Over 20 commands 
are added to the Basic language. These 
commands will set, clear or complement 
points, lines, boxes, circles, ellipses, or 
arcs. The hi-res screen can be printed on 
any of 30 popular printers or saved or 
loaded to disk without leaving Basic. Areas 
may be filled in with any of 256 patterns. 
Sections of the screen may be saved and 
then put back using any of five logical 
functions. Labels can be printed in any 
direction. The viewing area can be 
changed. The entire screen can be 
complemented or cleared. Graphics Basic 
provides dot densities of 640 x 240, 320 
x 240, 160 x 240, and 160 x 120, all of 
which can be used in the same display. 








Superior Software. 


The 
comes with over 40 programs and files 
which make it easier to use, serve as 


board 


practical applications, demonstrate its 
capabilities, and serve as programming 
examples. The software works with 
TRSDOS 1.3, 6.1.2, 6.2, 6.3; Dosplus 
3.4, 3.5, 4; LDOS; and Newdos80. The 
Grafyx Solution is also supported by 30 
optional applications programs: Draw, 
Bizgraph, xT.CAD, 3D-Plot, Slideshow, 
Mathplot, Surface Plot, Chess, etc. 

The Grafyx Solution package is 
shipped complete for $129.95 (reduced 
from $299.95). The manual only is $10. 
Payment may be by check, Visa/MC, or 
COD. Domestic shipping is free on pre-paid 
orders. Texas residents add 7% tax. 


Micro-Lass, Inc. (214) 702-8654 
Dallas, TX 75248 


7309 Campbell Road 


THE PRICE!! $299.95 $199.95 99:95) 


1982 - 1984 


1984 - 1987 


On Sale NOW 


SPECIAL from your friends at Computer News 80 
25 5-1/4 Double/SINGLE SIDED DISKS 


§ 9.75 


Complete with Sleeves, Labels and Shipping 


As a special service to our readers who do not purchase disks in quantities of 
least 100 to get the best disk prices on the bulk market, we are offering you 
a special price for 5-1/4" floppy diskettes. 


These disks are 100% Certified Error Free, Premium Quality Double or Single 


Sided, Double Density disks, with a life time guarantee. 


disk that proves to be defective. 


ORR R ROR TEER 


We will replace any 


CORRODE TIDE ROR TR DETR DEDEDE ER DEDRORER DETR TR DEA 


SIEIEIEIEIEIEIEIEI ses eIe. 


COMPUTER NEWS 8O 


BACK ISSUE SPECIAL 


AIT,ITI. OF 1983839 VOLUME L s18a8.00 
for all 12 issues. 


ALI OF 19839 VOLUME 2m S20.200 
for all 12 issues. 


Each Volume is bound in a separate 3 ring binder. 


FREE CN80 Index Disk with Index program with each order. 


Price includes Shipping and Handling in Continental US. 


Shipment to FPO, APO, HI, AK, PR, and Canada add $3.00 
for each Volume ordered. Shipment for countries outside 
continental US add $5.00 US funds for each Volume ordered. 


SIX HIGHLY USEFUL UTILITY PROGRAMS FOR THE MODEL 4 


COMMAND LINE EDITOR provides command line editing 
and saves the command line for use with a_ single 


key stroke, 

Mark Reed N COMMAND LINE STORAGE UTILITY stores command lines, 
MAPMEM lists memory modules that are installed in 
low and high memory, 

RECLAIM removes unused memory modules from high 
memory, freeing up valuable memory space, 

SWAP exchanges disk drive numbers, Route 
application programs that only recognize drive one 
for saving data to other drives, 

UNFILTER un-installs filters without otherwise 
disturbing the filtered device, 


This is a valuable set of utilities for the 
programmer and the casual non-programmer user, 
$ 14,95 plus $ 2,00 shipping and handling, 


FULLY SUPPORTED BY THE 


Model 4 ae 


Published and Distributed by 


Utility Disk Computer News 80 





TOP QUALITY PRINTER RIBBONS 














Printer Radio Shack CN80 Type Price Each Price Each 
Catalog Number Number for One 6 or More 
LP I, II, IV 26-1413 CN1001 FABRIC REFILL 5.55 5.05 
LP III, V 26-1414 CN1002 FABRIC CART. 6.38 5.88 
LP III, V ___26-1414 CN1003 FABRIC REFILL 4.79 4.29 
LP VI/VIII,DMP 400/420 26-1418 CN1004 FABRIC CART. 5.60 5.10 
LP VII, DMP 100 26-1424 CN1038 FABRIC CART, 7.46 6.96 
DMP_110 26-1283 CN1i005 FABRIC CART. 6.58 6.08 
DMP130/130A/132/133/107 26-1236 CN1006 FABRIC CART. 7.20 6.70 
DMP130/130A/132/133/107 26-1238 CN1007 FABRIC REFILL 5.00 4.50 
DMP 500 26-1482 CN1008 FABRIC CART. 13.40 12.90 
DMP 120,200 26-1483 CN1009 FABRIC CART. 7.00 6.50 
DMP 120,200,500, 430 26-1489 CN1010 FABRIC REFILL 4.85 4,35 - 
DMP 105, 106 26-1288 CN1011 FABRIC CART. Not Available* 
DMP 105, 106 26-1288 CN1012 FABRIC REFILL 5.84 5.34 
DMP 430 26-1296 CN1013 FABRIC CART. 12.25 11.75 
DMP 440 26-2809 CN1014 FABRIC CART. 18.25 17.75 
DMP 2100,2100P, 2110 26-1442 CN1015 FABRIC CART. 6.10 5.60 
DMP 2100,2100P, 2110 26-1442 CN1016 FABRIC REFILL 4.85 4.35 
DMP 2120 26-2834 CN1017 BLACK RIBBON 12.00 11.50 
DMP 2120 7 26-2836 CN1018 BLACK REFILL 7.93 7.43 
LMP 2150 26-1287 CN1019 BLACK CART. 8.00 7.50 
DWP II, DWP 410,510 26-1419 CN1020  MULTI-STRIKE 5.35 4.85 
DWP IIT, DWP 410,510 26-1419 CN1021 M-S REFILL 4.50 4.00 
DWP II, DWP 410,510 26-1449 CN1022 FABRIC CART. 6.19 5.69 
DWP II, DWP 410,510 26-1449 CN1023 FABRIC REFILL 5.45 4.95 
DWP 520, 230, 210 | 26-1445 CN1024 MULTI-STRIKE 5.15 4.65 
DWP 520, 230, 210 26-1445 CN1025 M-S REFILL 4.50 4.00 
DWP 520, 230, 210 26-1458 CN1026 FABRIC CART, 5.60 5.10 
DWP 520, 230, 210 26-1458 CN1027 FABRIC REFILL 4.80 4.30 
DWP 220 26-1299 CN1028  MULTI-STRIKE 7.95 7.45 
DWP 220 26-1299 CN1029 M-S REFILL 4.80 4.30 
DMP 300/2102 26-2819 CN1i030 FABRIC 7.15 6.65 
DMP 300/2102 26-2819 CN1031 LONG LIFE 8.45 7.95 
ALPS ASP-1000 900-2326 CN1032 FABRIC 7.55 7.05 
EPSON FX/MX/RX-80 900-2327 CN1033 FABRIC 5.50 5.00 
EPSON LX/80/90 900-2328 CN1034 FABRIC 5.00 4.50 
PANASONIC KXP1090/1190 900-2331 CN1035 FABRIC 6.10 5.60 
PANASONIC KXP1090/1190 900-2331 CN1036 LONG LIFE 7.35 6.85 
STAR MICRONIX NX-1000 900-2332 CN1037 FABRIC 6.45 5.95 


ALL RIBBONS ARE BLACK ONLY. 
ADD PER ORDER FOR S & H.........Continental HI,AK,PR Canada Overseas 
United States FPO & APO US FUNDS’ Write for 
1 to 5 Items $1.50 $2.00 $2.25 S&H Costs 
6 or More Items 2.00 3.00 4.00 
COD Orders Add an additional 3.30 - Sorry-no credit card orders accepted. 
*DMP 105 Plastic cartridges are not available from the plastic manufacturer, 
and are only available from Tandy at this time. Save your DMP 105 plastic 
cartridge and order our ribbon refill. 


If you don't see your ribbon here, write or call as we have almost every 

ribbon made available. These are continuous fabric ribbons, not welded seam 
ribbons. Welded seam ribbons do not give the life that a continuous no-seam 
fabric ribbon does. These ribbons are the very best we could find on the market, 
and should prove trouble free, with a very long life, even with heavy usage. 


Order from COMPUTER NEWS 80, PO Box 680 Casper, WY 82602 


Wyoming Residents Add 4% Sales Tax 2/8/30 


PRODUCT ORDER 


Computer News 50 


Quantity Item Price Quantity Item Price 


P.O. Box 680 
CASPER. WYOMING 82602-0680 


CN80 BACK ISSUES $ 2.00 ea, 


Available from Vol 1 No, 1 January 1988 
Specify Vol & No 


CN80 INDEX on Disk $ 2.00 ea, 
Complete index for CN80 1988 thru 1989 on a 
Flippy disk, 24 classifications of search, 
Search by Mod #, "word" only, book (issue), 
system, articles w/program listings, etc, 
Specify LSDOS 6.3 or TRSDOS 1.3 


CN80 DISK SERIES NUMBER ONE $ 5.00 ea, 
All the programs printed in Vol 1 No.1 to 
No.6 the first six months, plus a Shell 
Utility Bonus Program, Price includes disk, 
postage and handling. LS-DOS 6.3 and TRSDOS 
1.3 format, 


CN80 DISK SERIES NUMBER TWO $ 5,00 ea, 
All the programs printed in Vol 1 No. 7, 8 
and 9, Includes Coupon Program, Financial 
Program, Bonus File Splitting Program, and 
a Basic List to printer program that will 
list to printer any Model 4 Basic Program, 
Price includes disk, postage and handling, 
LS-DOS 6.3 and TRSDOS 1.3 format. 


CN80 DISK SERIES NUMBER THREE $ 5,00 ea, 
All the programs printed in Vol 1 No,10, 11 
and 12, Last three months of 1988 published 
programs, and Dick Hollenbeck's FASSET/BAS 
business program (see Vol 1No 12) and 
other bonus public domain programs, Price 
includes S&H. LS-DOS 6.3 and TRSDOS 1.3 


CN80 DISK SERIES NUMBER FOUR $ 5,00 ea, 
All the programs printed in Vol 2 No.1, 2 
and 3, The first three months of 1989 
published programs, and Henry H, Herrdegen 
Model III programs, and other bonus public 
domain programs, Price includes S&H, LS-DOS 
6.3 and TRSDOS 1.3 format, 


CN8O0 DISK SERIES NUMBER FIVE $ 5.00 ea, 
All the programs printed in Vol 2 No.4, 5 
and 6. SORT4/BAS, SORT4/DEMO, Date 
Extension Patches to 2011, TYPETEXT, 
DISCLEAN, METRIC CONVERSION, LLISTER/BAS, 
and CHASREG/BAS. These and other bonus 
public domain programs, Price includes SéH. 
LS-DOS 6.3 and TRSDOS 1.3 format, 


CN80 DISK SERIES NUMBER SIX $ 5.00 ea, 
All the programs printed in Vol 2 No.7, 8 
and 9, The third three months of 1989 
published programs, Educational Programs 
for Model III, Home Inventory and _ bonus 
public domain programs, Price includes S&H. 
LS-DOS 6.3 and TRSDOS 1.3 format, 


CN80 DISK SERIES NUMBER SEVEN $ 5.00 ea, 
All the programs printed in Vol 2 No,10, 11 
and 12, The last three months of 1989 
published programs, plus bonus public 
domain programs, Price includes S&H. LS-DOS 
6.3 and TRSDOS 1.3 format, 


CN80 DISK SERIES NUMBER EIGHT $ 5,00 ea, 
All the programs printed in Vol 3 No.1, 2 
and 3, The first three months of 1990 
published programs, plus bonus and GRAFDISK 
programs, Price includes S&H. LS-DOS 6.3 
and TRSDOS 1.3 format, 


MANUALS & PROGRAMS PUBLISHED BY CN80 


MOD III by CHRIS $ 24.95 ea, 
TRSDOS 1.3 VERSION 

by Chris Fara (Microdex, Corp.) 

The Model III manuals written in plain 
English, Easier to understand than the 
Tandy Manuals, 8-1/2 x 11 format in a three 
ring binder, $24.95 plus $4.00 S&H in US, 
Canada $6.50 S&H. 


MOD III by CHRIS $ 24.95 ea, 
LDOS 5.3 VERSION 

by Chris Fara (Microdex, Corp.) 

The Model III manuals written in plain 
English. Easier to understand than the Tandy 
Manuals, 8-1/2 x 11 format in a three ring 
binder, $24.95 plus $4.00 S&H in US, Canada 
$6.50 S&H. 


MOD 4 by CHRIS $ 24.95 ea, 
by Chris Fara (Microdex, Corp. ) 

For the Mod 4/4P/4D TRS-DOS 6 & LSDOS 6.3 
written in plain English, Use of DOS, BASIC, 
JCL, & other added useful information, 8-1/2 
x 11 format in three ring binder, 230 pages. 
$24.95 plus $4.00 S&H in US, in Canada 
$6.50 S&H. 


Quantity Item 


JCL by CHRIS 


Z-80 TUTOR I by Chris Fara 


SY Set ae ae aD tet ——p oe a2 3 I I I ed 


$ 7.95 ea, 
by Chris Fara (Microdex, Corp.) 

How to write Job Control Language Programs 
30 8-1/2 x 11 page booklet, explains all 
about JCL on your Model III, Model 4/4D/4P, 
Price includes shipping & handling, 


$ 9.95 ea, 
The 1989 series of essays published in 
Computer News 80 revised in book form, Z-80 
instructions and subroutines for Mod-III and 
Mod-4, 40 page booklet, $9.95 S&H included, 


PATCH UTILITY PROGRAM FOR TRSDOS 1.3 


By Henry H. Herrdegen $ 10,00 ea. 
This program contains all the patches for 
TRS-DOS 1.3, patches for Scripsit, and for 
Profile III+, with a program to automatical- 
ly install these patches, without typing the 
patches, Price includes disk, and mailing. 
TRSDOS 1.3 format only, 


Z-80 MACHINE LANGUAGE TECHNIQUES $ 22.95 ea, 
for the TRS-80 by Don Ady. 236 pages in 
8-1/2 x 11 format in a 3 ring binder, 
"Presenting all the required fundamentals of 
Machine language programming, with practical 
applications," $22.95 plus $4.00 S&H in US, 
Canada $6.50 S&H. 


PACK for Model 1/3/4 $ 17.95 ea, 
BASIC Program Packer by David Goben, 
Add $4.00 S&H in US, $6.50 Canada, 


PACK — MS-DOS Version $ 17.95 ea, 
BASIC Program Packer by David Goben, 

Add $4,00 S&H in US, $6.50 Canada, 

DEA Disk Editor and Assembler $ 49.85 ea. 
for Mod I/III/4 by David Goben 

Extends your computing power and Assembling 
Language editing and assembling, 118 Pages 
8.1/2 x 11 format in a three ring Binder, 
Add $4.00 S&H in US, $6.50 Canada, 


T62D0SXT Upgrade TRS 6 Dating $ 18,00 ea, 
by David Goben, Extends dating beyond 

Dec, 31, 1987 to Dec 31, 1999, Includes 
optional system patches & utility programs, 
Add $2.00 for S&H. 


DIRECT 
MAIL 





THE PERSONAL MEDIUM 


REMBRANDT Graphics Toolkit 


BOOK 


DISK INTERFACING GUIDE/MOD I 


$ 39,95 ea, 
by Spectre Technologies, Graphic software 
for Mod 4/4D/4P, TRSDOS/LSDOS, hi-res board 
Not required, Freehand drawing, Business 
graphics, Slide shows, & Hard copy. $39.95 
plus $4.00 S&H. Order both Rembrandt and 
Long & Loud for $67.50 plus $4.00 S&H. 


LONG & LOUD Sideways & Banner $ 34,95 ea, 
by Spectre Technologies, Sideways & Banner 
printing utility for Dot-Matrix printers, 
Mod 4/4D/4P TRSDOS/LSDOS, see display ad 

in CN80 for printer compatibility, $34.95 
plus $4.00 S&H. Order both Rembrandt and 
Long & Loud and Save, see Rembrandt above, 


CN80 REPORT/DATE EXTENSION $ 3.00 ea, 
Reprints of reviews of programs that 

takes TRSDOS 6.X dating beyond 1987, 

Price includes shipping & handling. 


$ 1,85 ea, 
by William Braden Jr, Out of print book, 
originally sold by Code Works, quantities 
limited, Price includes S&H. 


FILE CABINET CATALOG DISKS 


(Price of Catalog nonrefundable) 


MODEL 4 TRS-80 CATALOG $ 2.00 ea, 


Includes S&H 


MODEL 4 HIGH RESOLUTION/READMAC $ 2,00 ea, 


Includes S&H 


ORCHESTRA-90 (Music) $ 2.00 ea. 


Includes S&H 


TRS-80 MODEL 1/3 CATALOG $ 2,00 ea, 


Includes S&H. 
Specify LDOS SS/SD 35TRK 
or TRSDOS 1.3 SS/DD 40TRK 


TRSLINK Monthly Disk Issue $ 1,50 ea, 


Includes S&H. Specify issue 


SPECTECH Disk #1 $ 5.00 ea, 


Includes S&H. 


RADIO SHACK ORIGINAL SYSTEM DISKS 


TRSDOS 1.3 R/S Cat # 26-0312 $ 7,00 ea. 


Original Model 3, Disk Operating 
System and BASIC Interpreter Disk, 
Includes Shipping & Handling 


LABELS ~- One Wide Labels for Mail or Disks 


Pressure Sensitive, Quality Guaranteed 
3-1/2 X 15/16 Plain Permanent Mailing Labels 


1000 per package $ 4,22 ea, 
5000 per Box (One Box) $ 11.95 ea, 
More than one.5000 pc, box $ 10,95 ea, 


Write 


3~1/2x 1-7/16 Plain Permanent Mailing Labels 


1000 per package $ 5,25 ea, 

5000 per box $ 22.95 ea, 

More than one 5000 pc. box $ 20.66 ea, 

4 x 1-7/16 Plain Removable Labels 

1000 per package $ 7.45 ea, 

5000 per box (One Box) $ 26.95 ea, 

More than one 5000 pc. box $ 24,95 ea, 

CN80 Disk Printed Disk Labels 

3-1/2 x 1-7/16 Removable 

100 per package $ 3.95 ea, 

200 per package $ 7,00 ea, 
Add for shipping One Label Package $ 2.00 ea, 
One Box of Labels $ 4,00 ea, 
More than one box per Shipment $ 3.00 ea, 
SELECTOR SWITCH 

A-B SWITCH, centronics $ 23.75 ea. 


Connect two printers to one computer, or 
connect two computers to one printer, 
Use Printer to Switch Cables listed, 
$23.75 plus $4.00 S&H in US. Canada $6.50 


in any additional items: 


FLOPPY DISKS 


FLIPPY DISKS 


Add $1.50 S&H for 


disks 


$ .40 ea, 
5-1/4 Double/Single Sided Disks DD. 

100% Error free Lifetime Guarantee with 
Paper Sleeves, Labels & Read Write Tabs, 


$ .60 ea, 
5-1/4 Single Sided DD on both sides, 

Premium Quality with two notches by factory, 
Name brand mfg, 100% Error Free with Paper 
Sleeves, Labels and Tabs, 

10 disks, for more than 10 
add $2.50 Minimum order 10 disks, 


CENTRONICS PRINTER CABLES: All NEW-Unused cables, 


Flat Ribbon 6', Mod III/4/4DaP 


$ 12.95 ea, 
Printer Cable 


Flat Ribbon 15', Mod III/4/4D&P $ 15.00 ea, 


Printer Cable 


Printer to Selector Switch 6' $ 13.49 ea, 
___ Printer to Selector Switch 10' $ 15,95 ea, 
_____ Printer to Selector Switch 15' §$ 18.95 ea, 
_______ RS232 Modem Cable 6 ft, $ 14,95 ea, 


Equal to Radio Shack #26-240 


Add $ 4,00 S&H for one or more cables, 
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sQuantity : 





Ship to: 


NAME 


ADDRESS 


CITY 


Total Enclosed 


Phone 


ZIP 


Check or Money Order Payment Only - Sorry no Credit Card orders, 


COD orders add $3.30. Wyoming Residents add 4% Sales Tax, 


03/90 


Classified Computer News 80 Classified 


2 2 ee 6 oS ee oy 
Public Domain Programs FOR TRS-80 
Models 3 & 4 FREE Disc (Catalogs 
over 1500 programs Please indicate 
systems, The JaRick Company, P.O. 
Box 22708, Robbinsdale, MN 55422 
Drop us a line, 


HUGE SELECTION OF PRINTWHEELS for 
virtually all Dasiywheel Printers 
in existence, Best Prices with 
absolute guarantee of satisfaction, 
Mention CN80 for $2/Credit, Bill 
Allbritton, Suite 16, 2603 artie 
Sts, Huntsville, AL 35805, 
(205)536-3879 or 536-1527 


TANDY ORIGINAL SOFTWARE 
ALL MODELS — NEW CATALOG! UP TO 90% 
OFF RADIO SHACK LIST. SEND $1.00 & 
LSASE FOR CATALOG TO: KING MICRO; 
DEPT. C3; P.O. BOX 72189; COLUMBUS, 
OH 43207 ~ SPECIFY MODEL 


WANTED: LISP, ADA, APL, etc that I 
wish/need, Also info on Robitics + 
using TRS-80! R.Y. Breton, C.P. 95, 
Stn, Place D'Armes, Montreal, P.Q., 
Canada H2Y 3E9, 


WALLSTRT/TRK: RS Model 4D, MS-BASIC 
copyrighted prgm for tracking your 
Stock Market Portfolios, Includes 
RATIOing & Multi-Point, X-Y GRAPH- 
ing to aid decision-making, 15K 
editable program, 20K documentation 
& 10K of actual/demo data files 
supplied SD on 5" floppy in pure 
ASCII. Price $40, For optional- 
extra $20 I'll edit prom to reflect 
your actual Portfolio, Demo Print- 
out & Prospectus/Application for $1 
bill & your 4X9 SASE, For complete 
info write: Roy Martin,PE PO Box 
939, Westmont, IL 60559-0939 

(PLS NOTE: HI-RES board NOT req'd) 


MODEL 4 FOR SALE 2 Disk Drives, 


Excellent condition, $200 plus 
shipping, C. Jespersen, P.O. Box 
471, Bridgeton, NJ 08302, Phone 


609-451-2710 after 6PM EST. 


Zanetti; 


converted Model III/4, Easy instal- 
lation, snap in above disk drives & 
look great! $9.95 per set plus $2 
S&H. 

METRIC MOUNTING SCREWS for TEAC's, 
No retapping necessary! $,50 per 
set of 16 screws plus $2 S&H. No 
shipping charge when shipped 
w/cover panels, 

NEED SPECIAL screws, drills, taps, 
plastic, write to me & tell me what 
you nee, Please give phone number 
or SASE. Send orders to: Joseph L 
307 Morton Ave; _ West 
Berlin NJ 08091. 


FOR SALE: 15 megabyte hard drive, 
MEGAPLEXER attached, allows 2 Tandy 
Model 3 &/or 4 simultaneous access, 
Hard drive loaded w/Model 4 
programs, $500 FOB Los Angeles, TOM 
WASS, PO Box 1735, Beverly Hills, 
CA 90213 


* * Tax89 v.3.0 * * 

For the TRS-80 Model 4/4D/4pP 
Complete tax program that includes 
Form 1040, Schedules A-E, SE, & R, 
Auto Library Tax Table Scanning, 
Instant correction and insertion, 
For information send a S.A.S.E. or 
send $20 (postal MO) for Tax89 to: 
Charles W, Smith;91 Tarryton Ct. W; 
Columbus, Ohio 43228-6509 

Tax89EZ will be available Free from 
most TRS-80 supported BBS's & CN80. 


NEEDS TO BUY Aging TRS-80 
dependent whose eyes’ are _ past 
installing upgrade boards needs’ to 
buy a Model 4 or 4D _ w/Grafyx 
Solution & XLR8er boards already 
installed & up & running, Call K.J. 
Foreman, Jr., at (704)669-2782, or 
write Box 488, Montreat, NC 28757 
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FOR SALE MODEL 4P 64k, green 
screen, no software, $295 + $15 
shipping, Contact Computer News 80, 
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HALF HEIGHT COVER PANELS for TEAC 


TANDY 1400LT, two 3.5 DD's, Extra 
battery & many programs, $895, 
DWP210 printer w/tractor feed, 3 
wheels, ribbons & cable, $175. John 
Dover, 815 Daphne Ct., Carlsbad, CA 
92009.  (619)931-2528, A real 
bargain, 


WANTED’ Tractor feed for DwWP210; 
R/S ruler #26-1313; R/S M-4 
keyboard cover #26-1342. Dale 
Ty jeski, PO Box 18946, Cleveland, 
OH 44118-0946 or BBS #216-442-0879 
(8-N-1) 


w/2-drive 
& monitor, 
bar code reader & assorted 
software, $500. Richard Belz, 
Gainesville, FL. Ph #(904)336-2260 


MODEL 100 
disk/video 


PORTABLE 
interface 


FOR SALE: 15meg hard drive w/l 
15meg slave unit w/all cables ~- 
ready to hookup, Would like to 
trade for MS-Dos computer or best 
offer over $400, (804)829-6009 - 
leave message, Rt 2 Box 95, Charles 
City, VA 23030 


FOR SALE for Model 4: Deskmate cat 
#26-1608 + working disks $22.00; 
pfsfile cat #26-1518 manual + 
working disk $22.00; Part II TRSDOS 
BASIC $12.00. R E Musser, 547 
Normandy Way, Grand Jct,, CO 81501 
(303) 242-5872 


FOR SALE MODEL 1 MONITOR .... $50 
or B.0. + $15 shipping. 
Computer News 80, 


Contact 





Loup! = (Rembrandt 


Sideways and Banner | Complete Business Graphics Toolkit 


Printing Utility 
for Dot Matrix Printers What did the experts have to blocks of graphic, fill tham, copy arid 
say about REMBRANDT? delete them and more! 


; * Business graphics: REMBRANDT can 
peng hisaoed eels neha se pce eA we ll read your hand-entered or disk based 
ted REMB RANDT p ing. and graphic ~—data and automatically create horizontal 
— is Aes rl ak and vertical bar charts, pie charts and xy 
rods ja ed powerful; yet‘edsy to ; plots with up to three variables, The charts 
am. Devote a few hours to getting familiar —_ are created on-screen, auto-scaled and 
with REMBRANDT and you'll find your good 


labelled — but you can still customize any 
of TRS-80 4 or 4P is a handy business 
graphics tool.” chart to your specifications. 


The New York Times sald, “The personal ¢ Slide shows: After you've built and saved 

puter makes:graphics simple and your graphic screens you can put them 
ee ob aeiicesteents together for a dazzling on-screen 
Spectre Technologies makes a wonderful 


as electronic slide show. Move from screen 
oes program called to screen using eleven cinematic special 


effects like .wipes,.fades and spirals. 
American Industry magazine said, “It's as 


¢ Hard copy: Print your-graphic screens on 
easy to use as a toy, but it's no toy! It lets most dot-matrix and daisy wheel printers 


| anyone put together graphics without a stich including Radia Shack LP & DMP series. 
of programming.” Sound: at! Hi | 
Peter McWilllams in the Personal Computer unas great! mow can get 
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TOTAL aEvENNES - $480. 228090.30 ° 
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for Model 4 (TRSDOS and 
LSDOS) 


$34.95 











MESSAGE IN 
A BANNER! 






























plus $4 per order shipping/handiing 


LONG: Did you ever have to print out a spreadsheet that was too wide for your printer? 
You spent the rest of the afternoon with scissors and tape putting all those little pieces Into 
one useable printout. Well, LONG is the answer to your problem... no more cutting and 
taping. LONG twists your printer's output SIDEWAYS and prints spreadsheets (or any text 
file) of any width the long way on one continuous sheet of paper, 





















LOUDI: Get your message across in no uncertain terms — now you, your computer and 
your dot-matrix printer can shout HAPPY BIRTHDAY MOM in eight inch high letters in any 
of five special type styles. Create banners, signs, posters or oversize greeting cards with 



















ease. Anything you can type can be printed loudly in gigantic letters! Buying Gulde sald, “It's an excellent, REMBRANDT? How much? 

Dot-matrix printers supported: AMT Oilice Printer, Anadex DP-9625B, DP-9000A, DP-9500A, DP-9001A, simple-to-use, effective tool for creating REMBRANDT is only $39.95 (plus $4 for 

DP-9501A, Apple Dot Matrix Printer, Imagewriter, Imagewriter Il, Base 2, BMC MicroGraphic, Cannon PJ-1080, graphics.” shipping and handling) and is available for 

Centronics 150-3, 352 and 739, C. itoh 8510 Prowriter, 8600B, 8610 BPI, CT! CT-80, Data General 4434, So the big shots liked it! the Model 4 TRSDOS/LSDOS 

DataProducts SPG8050, SPG8070, 8010, DataSouth DS-180, Diablo P11, C-150 Inkjet, DEC LA5O, all Epson ; 

and compatibles, Facit 4510, Genicom, Gemini 10X/10XPC/15X, Hewlett Packard Thinkjet, Quietet and What'l it do for me? i 
P82905, IBM Graphics printer and compatibles, QuietWriter, Proprinter, IDS Prism 80/132 (with Dot Plot), 

445, 560, MicroPrism, JDL 750, 750C, Legend 880/1360, Mannesman Tally Spirit and MT85/B6/160, MPI aspect Sach cel ace Computer Vews 50 

(Sprinter, Printmate 99 and 150), NEC 8023AC, P560, P565, P660, P665, P760, P765, Okidata 82/83 {with youll 6 y p P. 0. BOX 680 

Okigraph or PC-Write), 84, 92, 93, 192, 193, 292 and 293, Panasonic 1091, Radio Shack DMP Models A HFRes board not required — it works with CASPER, WYOMING 82602-0680 





100,110,120, 200, 400, 420, 500, 2100 & CGP-220, Tandy DMP-130, Tl 850, 855, Toshiba 24 pin printer. the graphics capabilities bullt into every 


Model 4, 4P or 4D. 





























2 ape «=< | Just look.at the advanced features sup- ORDER BOTH REMBRANDT 
onpeneovunemeranot  =§ Campauter Wews SO | ported by REMBRANDT: FOR $6750 
FOR $ 67.50 P.O. BOX 680 e Freehand drawing: You can draw lines, plus $ 4.00 S/H 
plus $ 4.00S/H CASPER, WYOMING 82602-0680 boxes, circles, and type on the screen in AND SAVE!! 


AND SAVE!! 





standard or extra large characters. Full 
block operations are supported — move 
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